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Vin 


Vorwort 


In vielen Bereichen des beruflichen Alltags findet man heute Mikrocomputer. Neuerdings 
ziehen diese Geräte auch in unsere Wohnungen ein. In der Form des Volks-Computers 
werden sie an ein (Farb-)Fernsehgerät angeschlossen und stehen für ernsthafte wie für 
unterhaltsame Anwendungen zur Verfügung. Voraussetzung ist der Besitz entsprechender 
Programme, die man kaufen oder in der Sprache BASIC selbst erstellen kann. 


Dieses Buch wendet sich an Leser, die lernen wollen, Commodore Volks-Computer zu 
programmieren. Der Autor geht davon aus, daß dem Leser ein derartiger Computer zur 
Verfügung steht. Daher sind zahlreiche Experimente und Aufgaben aufgenommen worden, 
deren Ausführung bzw. Bearbeitung die Basis bilden für das effektive Erlernen der Pro- 


grammierung. 


Vorkenntnisse über Aufbau und Funktionsweise von Digitalrechnern sind nicht unbedingt 
erforderlich. Die Eigenarten der Programmierung werden an populären Aufgaben und ein- 
fachen mathematischen Problemen demonstriert. Die dafür erforderlichen Mathematik- 
kenntnisse beschränken sich im wesentlichen auf die Grundlagen der Algebra. 


Zu danken habe ich meiner Frau für die umfassende Unterstützung und die Übernahme 
der Schreibarbeiten. Ich danke auch der Geschäftsführung der COMMODORE Büroma- 
schinen GmbH, die die Entstehung dieses Buches durch die vorübergehende Überlassung 
eines VC 20 gefördert hat. Nicht zuletzt gilt mein Dank den Mitarbeitern des Verlages für 
die reibungslose Zusammenarbeit. 


G. Oetzmann 


Hamburg, im Frühjahr 1983 


1 Was ist Programmierung? 


Ihr Mikrocomputer kann erst für Sie tätig werden, wenn Sie ihm eine Arbeitsanweisung er- 
teilen. Dabei ist nicht an eine elementare Anweisung wie etwa „addiere 2 Zahlen‘‘ gedacht, 
sondern an eine Folge solch elementarer Schritte. In ihrer Gesamtheit sollen sie geeignet 
sein, eine bestimmte Aufgabe zu bearbeiten, z.B. ein Rechteck auf den Bildschirm zu 
zeichnen oder die Lösungen einer quadratischen Gleichung auszurechnen. Derartig um- 
fassende Arbeitsanweisungen heißen Programm. Woher nimmt man nun die erforderlichen 
Programme? 


Auch Programme kann man kaufen. Solange sie zu Unterhaltungszwecken gedacht sind, ist 
das kein schlechter Weg. Mit der Zeit stellt sich aber auch bei vielen Benutzern solcher Pro- 
gramme der Wunsch ein, diese zu modifizieren oder eigene zu erstellen. Die Notwendigkeit 
zu Eigenentwicklungen wird noch größer, wenn Sie Ihren Rechner für ernsthafte Anwen- 
dungen einsetzen wollen. 

Der Weg von der ersten Idee für ein Programm bis zu dessen Fertigstellung ist mitunter 
mühsam. Man bewältigt ihn leichter, wenn man ihn in Etappen gliedert und diese sorgfältig 
bearbeitet. Die wesentlichen Abschnitte auf diesem Weg sind 


Problemdefinition 
Ablaufplanung 
Codierung 
Test 
Was sich im einzelnen dahinter verbirgt, soll an einem Beispiel erläutert werden. 


Wir wollen ein Programm erstellen, mit dem für beliebige Werte von p und q die quadrati- 
sche Gleichung x? + px + q = 0 gelöst wird. Die Lösungen berechnen sich nach 


( 


=) 700 
2 
re 


wie man in mathematischen Formelsammlungen nachlesen kann. Damit liegt der Umfang 
der auszuführenden Berechnungen fest. 

Im ersten Aufbereitungsprozeß müssen wir die erforderlichen Rechenschritte in eine zeit- 
liche Folge bringen: 


Werte für p und q festlegen (,‚eingeben‘‘). 


Symbol Bedeutung 


Grenzstelle 

Kennzeichnung von Anfang 
und Ende. Genau ein 
Anfang nötig. 


Ablauflinie 

Linie von oben in Symbole 
hineinführen. Sich kreuzende 
Linien bedeuten keine Zu- 
sammenführung. 

Pfeilspitzen erlaubt. 


Operation 

Verbale oder formelmäßige 
Beschreibung der auszu- 
führenden Aktion einsetzen. 


Eingabe, Ausgabe 
Richtung und betroffene 
Größen angeben. 


Verzweigung 
Ja-Nein-Entscheidung. 
Mindestens einen Aus- 
gang beschriften. 


Unterprogramm 
Markiert den UP-Aufruf. 


Programmodifikation 
Wird hier nur in 
Schleifen verwendet. 


Übergangsstelle 

Der Übergang darf jeweils 
von mehreren, aber nur zu 
einer Stelle erfolgen. 


Bemerkung 
- - —- —- Außerhalb der Symbole 


anbringen. 


Operation von Hand 

Für notwendige Eingriffe 
des Bedieners während 
des Programmlaufs. 


Bild 1.1 Ablaufplansymbole nach DIN 66091 


1 Was ist Programmierung? 


Beispiel 





Eingabe: 
P,Q 


ILL tammdaten 
lesen 
PLAY-Taste 
drücken 
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Den Bruch > berechnen, weil er mehrfach auftritt. 
Y 
xı und x, berechnen. 

Die Ergebnisse ‚ausgeben‘. 


—-q berechnen. 


1.1 Ablaufplanung 


Nach der präzisen Formulierung des Problems und der Bereitstellung aller auszuwertenden 
Formeln müssen alle für die Lösung erforderlichen Einzelaktionen in ein zeitliches Nachein- 
ander gebracht werden. 
Die Darstellung des Lösungsweges erfolgt gewöhnlich unter Verwendung genormter Sym- 
bole (s. Bild 1.1) als Programmablaufplan. Der Plan für den obigen, verbalen Ablauf ist in 
Bild 1.2, Version a dargestellt. Um Mißverständnissen vorzubeugen, sei darauf hingewiesen, 
daß die Zeile 

A=-P/2 
nicht als mathematische Gleichung gemeint ist. Sie bedeutet vielmehr, daß die auf dem 
Speicherplatz P stehende Zahl durch 2 geteilt, das Vorzeichen geändert und das Ergebnis 
auf dem Platz A gespeichert werden soll. Entsprechend sind die anderen Zeilen des Recht- 
eckes zu verstehen. 


a) 
Eingabe: 
P,Q 










Ausgabe: 
X1,X2 









W= JR Ausgabe: 
x1 =A-W "Radikand 
X2=A+W negativ 









Bild 1.2 
Lösung der quadratischen 
Gleichung 
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Wenn mit dem angesprochenen Ablauf auch die Lösungen quadratischer Gleichungen ermit- 
telt werden können, enthält der Plan noch eine Schwachstelle. Geben Sie beispielsweise für 
P und Q jeweils eine 2 ein, ergibt sich A? als 1, und es wird versucht, die Wurzel aus - 1 zu 
ziehen. Ihr Rechner weiß, daß das im Bereich der reellen Zahlen nicht geht, und bleibt mit 
einer entsprechenden Fehlermeldung stehen. 


Derartige Situationen sollten beim Entwurf des Ablaufplans erkannt und durch geeignete 
Maßnahmen verhindert werden. Wir dürfen nicht sofort die Wurzel, sondern zunächst nur 
den Radikanden berechnen lassen. Wenn dieser negativ ist, lassen wir die Meldung "”Radi- 
kand negativ‘‘ ausgeben, damit der Benutzer erkennt, warum das Programm keine Zahlen 
auswirft. Im anderen Fall wird der normale Rechengang fortgesetzt. Den so modifizierten 
Ablaufplan zeigt Bild 1.2, Version b. 


Solange Sie sich auf dem Gebiet der Programmierung noch als Anfänger fühlen, sollten Sie 
Ablaufpläne in der hier vorgestellten Ausführlichkeit zeichnen. Ein solcher Plan erleichtert 
Ihnen die Suche nach Fehlern in der Programmlogik. Als Konvention ist einzuhalten, daß 
die Ablauflinie beim Start-Symbol beginnt, nur von oben in die anderen Symbole hineinge- 
führt und nur nach unten — bei der Abfrage auch seitlich — herausgeführt wird. 


1.2 BASIC-Programm 


Mit der Erstellung des detaillierten Ablaufplans ist der konstruktive Teil der Programment- 
wicklung erledigt. Die heutigen Rechner sind jedoch noch nicht in der Lage, diesen Plan un- 
mittelbar abzuarbeiten. Sie verstehen nur Programmiersprachen. Bei Ihrem Rechner ist das 
cbm-BASIC, eine Erweiterung des Dartmouth-BASIC (Beginners All-purpose Symbolic In- 
struction Code). Deshalb müssen Sie den im Plan festgelegten Sachverhalt in eine gleichwer- 
tige Folge von BASIC-Anweisungen übersetzen (,,codieren‘‘). 


Für den Plan aus Bild 1.2, Version b, ergäbe sich folgendes Programm: 


10INPUT *P,Q';P,Q 

2A =-P/2:R=At2-Q 

30IF R<P® THEN PRINT "RADIKAND NEGATIV“: GOTO 69 
4DW=SOR(R):X1=A-W:X2=A+W 

SOPRINT X1,X2 

6DEND 


Dieses Programm kann dann von Ihrem Rechner interpretiert und ausgeführt werden. 


1.3 Programmtest 


Nur in Ausnahmefällen ist ein neues Programm fehlerfrei. Dagegen ist keineswegs ungewöhn- 
lich, daß schon im Ablaufplan logische Fehler stecken, und formale Fehler treten fast im- 
mer auf. Diese Verstöße gegen die BASIC-Sprachregeln werden bei der Programmausfüh- 
rung (vom Interpreter) entdeckt und mit einer entsprechenden Meldung angezeigt. Der Be- 
nutzer kann die Fehler beheben und neu starten. 
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Logische Fehler zu erkennen ist allein dem Menschen vorbehalten. Aber auch dabei, insbe- 
sondere bei der Lokalisierung der Fehler, kann der Rechner helfen. Besonders beachtens- 
wert ist die Möglichkeit, ein Programm an beliebiger Stelle unterbrechen zu können. Man 
kann sich Zwischenergebnisse anzeigen lassen und ggf. ändern und danach die Ausführung 
fortsetzen. 

In jedem Fall ist durch eine Reihe geeigneter Testläufe nachzuweisen, daß ein Programm 
die gestellten Anforderungen auch tatsächlich erfüllt. Beachten Sie, daß ein Lauf mit nega- 
tivem Ausgang für einen Fehlernachweis ausreicht, während selbst durch viele korrekte 
Durchläufe nur die Wahrscheinlichkeit für das Vorliegen von Fehlern reduziert wird. Über- 
legen Sie sich jeweils, wie Sie mit wenig Aufwand an Testläufen ein Maximum an Sicherheit 
erzielen. 
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2 Handhabung des Rechners 


In diesem Kapitel sollen Sie lernen, mit dem Gerät umzugehen, und einen Überblick über 
die wichtigsten Spezialtasten bekommen. Das Kapitel gliedert sich in einen Übungsteil und 
einen Textteil. An den nachfolgenden Aufgaben können Sie dann prüfen, wie weit Sie sich 
den gebotenen Stoff tatsächlich erarbeitet haben. In dieser Form sind auch die weiteren 
Kapitel aufgebaut. 

Bei den Experimenten zu Beginn der Kapitel sollten Sie in der Regel die Reaktion des Rech- 
ners notieren. Streuen Sie keine eigenen Versuche ein, weil dadurch die Reaktion beeinflußt 
und Verweise vom Textteil auf die vorangegangenen Übungen für Sie unverständlich werden 
könnten. 

Zumindest bei Ihren ersten Versuchen sollten Sie die vorgeschriebenen Anweisungen sehr 
genau lesen. Da fast alle Tasten doppelt belegt sind, müssen Sie jeweils entscheiden, ob, wie 
z.B. bei der Taste INST/DEL, die Hauptfunktion (DEL, ohne SHIFT-Taste) oder die Ne- 
benfunktion (INST, mit SHIFT-Taste) verlangt ist. 

Wenn man mit dem cbm-Rechner wirklich vertraut ist, zahlt sich das schon bei den vorgese- 


henen Übungen aus. Auch bei der Fehlerbeseitigung profitiert man davon. Daher muß dem 
Leser geraten werden, so oft wie möglich am Gerät zu arbeiten, alle vorgesehenen Experi- 
mente durchzuführen, möglichst viele Aufgaben zu lösen und, soweit Programme gefordert 


sind, diese auch tatsächlich auszuprobieren. 


a) Beginnen Sie nun die Experimente und schalten Sie Fernseher und Computer — die na- 
türlich verbunden sein müssen — ein. Auf dem Bildschirm wird eine Meldung der Form 


KKKKrKKK ZkKkrkKKK 


erscheinen. Unter dem R von READY blinkt der Cursor, der die Stelle des Bildschirms 
zeigt, die als nächste beschrieben wird. Schreiben Sie, und beobachten Sie dabei den 
Cursor (Leerzeichen erzeugen Sie mit der großen Taste am unteren Rand der Tastatur): 
?2+3 
Drücken Sie die RETURN-Taste. 
b) Schreiben Sie 
?6-4 


Wie reagiert der Rechner’? 
Drücken Sie die RETURN-Taste. 
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c) Schreiben Sie 
31 +5 


Drücken Sie die RETURN-Taste. Beachten Sie die Unterschiede zu den vorausgegange- 
nen Fällen. 


d) Probieren Sie jetzt die Cursor-Steuertasten aus, die Sie mit der Aufschrift CRSR im 
rechten Teil der Tastatur finden. Betätigen Sie diese Tasten, halten Sie sie längere Zeit 
nieder, auch bei gedrückter SHIFT-Taste, und registrieren Sie die resultierende Cursor- 
Bewegung. Bringen Sie den Cursor auf die 3 in der Zeile „31 + 5‘. (Jetzt blinkt die 3.) 
Betätigen Sie einige Male die INST-Taste. Schreiben Sie 

? 


und drücken Sie die RETURN -Taste. 


e) Setzen Sie jetzt den Cursor hinter den Punkt der vorhergehenden Zeile, und betätigen 
Sie die DEL-Taste, bis das Wort „READY“ gelöscht ist. Schreiben Sie vor die 3 in der 
untersten Zeile ein Fragezeichen und hinter die 6 


+ 5/4 
Drücken Sie die RETURN-Taste. 


f) Schreiben Sie jetzt 
25?5+4,6 


Drücken Sie die RETURN-Taste. Notieren Sie Ihre Vermutung darüber, weshalb nicht 
gerechnet wird. Dann setzen Sie den Cursor auf das Fragezeichen in der letzten Zeile und 
drücken so lange die DEL-Taste, bis die vor dem Fragezeichen stehenden Ziffern ge- 
löscht sind. Betätigen Sie die RETURN -Taste. 


g) Löschen Sie jetzt die letzte Zeile (READY), setzen Sie vor die 9 ein Fragezeichen und 
drücken Sie die RETURN-Taste. Falls Ihr Rechner keine 9 zeigt, müssen Sie Punkt f) 
wiederholen (beachten Sie das Komma!). 


h) Bewegen Sie den Cursor um 3 bis 5 Zeilen nach unten und beobachten Sie dabei den 
Bildschirm. Danach führen Sie den Cursor auf das R in der untersten Zeile und schreiben 


? 6.25/.25 
Bewegen Sie jetzt den Cursor eine Zeile nach unten, und betätigen Sie die RETURN-Taste. 


Setzen Sie dann den Cursor auf den Schrägstrich, und betätigen Sie die RETURN-Taste er- 
neut. 


2.1 Ein- und Ausschalten 


Nun wollen wir erörtern, was Sie in den vorstehenden Experimenten kennengelernt haben. 


Nachdem Fernseher und Computer miteinander verbunden und eingeschaltet sind, wird 
der nutzbare Speicherbereich angezeigt (”... BYTES FREE“). Die angegebene Zahl sollte 
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bei Ihrem Rechner stets gleich sein, andernfalls müssen Sie den Rechner aus- und nach einer 
Pause von mehreren Sekunden erneut einschalten. Bleibt die Anzeige falsch oder fehlt sie 
völlig, versuchen Sie, mit Hilfe des Bedienungshandbuches die Störung zu beheben, oder 
wenden sich in schwerwiegenden Fällen an den Wartungsdienst. 


Normalerweise wird sich Ihr Rechner als arbeitswillig erweisen, was er Ihnen durch das 
Wort READY anzeigt. Nehmen Sie sein Angebot an und sagen Sie ihm, was er tun soll. 
Abgesehen von einigen Spezialtasten, führt das Betätigen einer Taste zu der Anzeige des 
entsprechenden Zeichens auf dem Bildschirm. Der Cursor, ein blinkendes Quadrat, zeigt 
jeweils an, wohin das nächste Zeichen gesetzt wird. Nach dem Schreiben rückt er eine Stel- 
le weiter. War die Zeile voll, springt er an den Anfang der nächsten Zeile. Falls der Cursor 
schon am unteren Bildschirmrand stand, wird zuvor der ganze Schirminhalt um eine Zeile 
angehoben, so daß die oberste Zeile verlorengeht. 


2.2 Spezialtasten 


Durch die Cursor-Steuertasten können Sie den Cursor nach links, rechts, oben, unten oder 
in die linke obere Ecke bewegen. Schon hier sei erwähnt, daß Sie diese Bewegungen auch 
programmieren können (s. Kap. 5). Die Tasten werden dann nicht bei ihrer Betätigung wirk- 
sam, sondern erst während der Ausführung des Programms, in das sie eingefügt wurden. 


Die Steuerungsmöglichkeiten des Cursors erweisen sich als sehr nützlich, wenn Teile einer 
auf dem Bildschirm stehenden Zeile gelöscht oder geändert werden sollen. Um ein Zeichen 
zu ersetzen, genügt es, den Cursor auf die fragliche Position zu bewegen und das neue Zei- 
chen zu schreiben. So haben wir in der Übung h) das Wort READY bei R beginnend Zei- 
chen für Zeichen durch einen Rechenausdruck überschrieben. 


In Übung e) haben Sie gesehen, wie man ein Zeichen löschen kann: Der Cursor wird hinter 
das zu löschende Zeichen gesetzt und die DEL-Taste betätigt. Daraufhin verschwindet das 
vor dem Cursor stehende Zeichen. Der Cursor und der Rest der Zeile rücken eine Stelle 
nach links. Sollen mehrere benachbarte Zeichen gelöscht werden, sollte man von rechts her 
vorgehen, weil der Cursor dann nur einmal positioniert werden muß. 


Wollen Sie Zeichen einfügen, wie das Fragezeichen in Übung d), muß dafür zunächst Platz 
geschaffen werden. Dazu wird der Cursor auf die Stelle gebracht, vor die der Einschub ge- 
setzt werden soll. Jedes Drücken der INST-Taste rückt den mit der Cursor-Position begin- 
nenden Rest der Zeile um eine Stelle nach rechts. Der Cursor bleibt am Anfang der Lücke 
stehen. Ist diese groß genug, kann die vorgesehene Ergänzung geschrieben werden. 


Wenn der Cursor in einer soeben mit INST geschaffenen Lücke steht, können Sie ihn nicht 
mit den Steuertasten bewegen. Diese Tasten werden gespeichert, was Ihnen durch besonde- 
re Symbole angezeigt wird. Nur die DEL-Taste wirkt normal. 


Alle Spezialtasten sind als Dauerfunktionstasten ausgelegt, d.h. wenn man eine dieser 
Tasten längere Zeit niederdrückt, tritt deren vorstehend genannte Wirkung mehrfach ein. 
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2.3 Aufbau von Zeilen 


Abgesehen von der Cursor-Bewegung bzw. der Zeichenanzeige auf dem Bildschirm, hat .die 
Betätigung von Tasten keine erkennbare Rechnerreaktion hervorgerufen. Eine Ausnahme 
bildet die RETURN-Taste. Beachten Sie, daß alle Berechnungen erst nach Betätigung die- 
ser Taste durchgeführt wurden. Bis dahin standen die eingegebenen Zeichen nur im Bild- 
schirmspeicher. Über diesen besonderen Speicherbereich können Sie insofern frei verfügen, 
als Sie beliebige Zeichen in beliebiger Reihenfolge auf beliebige seiner Plätze setzen können. 
Da stets alle dort gespeicherten Zeichen angezeigt werden, sehen Sie jederzeit den genauen 
Speicherinhalt. Durch Betätigung der RETURN-Taste wählen Sie aus diesem Speicherbe- 
reich jene Zeile aus, in der der Cursor steht, und übergeben sie dem Rechner zur Bearbei- 
tung. Falls diese Zeile mit einer Zahl beginnt (s. Übungen c) und f)), gelten die Zahl als Zei- 
Iannummer und die Zeile als Programmzeile. Sie wird im Programmspeicher abgelegt und 
zum jetzigen Zeitpunkt nicht ausgeführt. 


Die Zahlen von 9 bis 63999 sind als Zeilennummern zugelassen. 


Zeilen, die nicht mit einer Zahl beginnen, werden nach Betätigung der RETURN-Taste so- 
fort interpretiert und ausgeführt. 


Im Regelfall bildet eine Bildschirmzeile genau eine Programm- bzw. Interpreterzeile. Um 
bei einem System wie dem VC 20 mit einer Bildschirmzeilenlänge von 22 Stellen nicht auf 
derart kurze Anweisungen beschränkt zu sein, wurde der Interpreter so ausgelegt, daß er 
wahlweise mehrere Bildschirmzeilen zu einer Interpreterzeile zusammenfaßt. Diese verlän- 
gerten Zeilen werden erzeugt, wenn bei Erreichen des rechten Bildschirmrandes einfach 
weitergeschrieben wird. Beim VC 20 können auf diese Weise bis zu 88stellige Zeilen aufge- 
baut werden. Beachten Sie, daß eine derartige Struktur des Bildschirms erhalten bleibt, bis 
sie durch Hochrollen des Bildes oder Betätigen der CLR-Taste aufgehoben wird. 


2.4 Ergebnisdarstellung 


In allen Fällen, bei denen nach Eingabe der RETURN-Taste ein Ergebnis angezeigt wurde, 
begann die übergebene Zeile mit einem Fragezeichen. Dieses sagt dem Rechner, daß er auf 
den Bildschirm ausgeben soll. Das gleiche Ergebnis wie in Übung a) hätten wir auch mit der 
Zeile 


PRINT 2+3 


erreicht. Wegen des geringeren Schreibaufwandes wird jedoch allgemein das Fragezeichen 
bevorzugt. 


PRINT ist das BASIC-Kennwort für Ausgabe. 
Bei der Ausgabe auf den Bildschirm darf statt PRINT ein Fragezeichen geschrieben 
werden. 
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Bei Programmzeilen verschwindet auch dieser optische Unterschied. Wenn Sie sich eine pro- 
grammierte Ausgabeanweisung erneut auf dem Bildschirm zeigen lassen (s. Kap. 4), wird 
stets das Wort PRINT geschrieben. 
Hinter dem Fragezeichen bzw. hinter PRINT dürfen mehrere durch Komma oder 
Semikolun getrennte Ausdrücke stehen. 
Wenn mehrere Ausdrücke aufgeführt sind, wie in Übung f), erscheinen die Ergebnisse neben- 
einander. Zu erklären, wie das im einzelnen geregelt wird, führt hier zu weit. Wir werden in 
Kapitel 5 näher darauf eingehen. 


2.5 Aufgaben 


2-1 Welche Bedeutung hat der Cursor? 

2-2 Was bewirkt die RETURN-Taste? 

2-3 Wie kann das Wort FLY, ohne die Buchstaben F, L oder Y erneut zu schreiben, in 
FLOPPY umgewandelt werden? 


2-4 Wie wird durch Ergänzung der Buchstaben B und R sowie mit den verschiedenen 
Spezialtasten das linksbündig geschriebene Wort UNSINN zu RUBIN? 


2-5 Wie reagiert der Rechner auf Zeilen, die mit einer Ziffer beginnen? 
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In diesem Kapitel soll die Arithmetik Ihres Rechners erörtert werden. Damit Sie sich bei den 
nachstehenden Übungen auf diesen Problemkreis konzentrieren können, sollten Sie kurz re- 

kapitulieren, was über den Cursor, die Cursorsteuerung und insbesondere die Korrektur von 

Tippfehlern gesagt wurde. Wenn Sie sich fit fühlen, schalten Sie den Rechner ein und begin- 

nen. 


a) Schreiben Sie 
? (22 - 29)*3/2 
und beenden die Zeile mit der RETURN-Taste. 
b) Schreiben Sie 


A = (22 - 29)*3/2 
?A 


wieder jeweils gefolgt von der RETURN-Taste. 


Ist Ihnen die Wirkung der RETURN-Taste klar? Wenn nicht, sehen Sie sich den betreffenden 
Abschnitt des vorigen Kapitels gleich noch einmal an. 

Auch die weiteren Beispiele sollen Sie, genau wie vorgeschrieben, Zeile für Zeile an den Rech- 
ner übergeben, und dazu müssen Sie ja jede Zeile mit der RETURN-Taste abschließen. Da 
Sie diese Notwendigkeit inzwischen kennen, wird von nun an nicht mehr auf das Betätigen 
dieser Taste hingewiesen. 


c) Schreiben Sie jetzt 


B = 213 
C=B-A/2 
?A;,B;C 


Die mittlere Zahl, die 8, ist das Ergebnis von 213. Vielleicht haben Sie es erraten: ge- 
rechnet wurde 2°? = 2*2*2=8. 


d) Vergewissern Sie sich, daß die Zahlen noch gespeichert sind: 
?A;B;C 
Schreiben Sie jetzt 
30 ?A;B;C 
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Wissen Sie noch, warum diese Zeile nichts bewirkt? Sie wird als Programmzeile angese- 
hen und im Programmspeicher abgelegt. Nun soll das gespeicherte Programm (hier: eine 
Zeile) ausgeführt werden. Dafür schreibt man das Kommando 

RUN 
Falls wiederum nichts passiert, haben Sie die RETURN-Taste nicht betätigt. Tun Sie es! 
Zum Vergleich geben Sie jetzt noch einmal folgende Zeile ein: 

?A;B;C 
Registrieren Sie die Unterschiede in Ihren Anweisungen und in der Reaktion des Rech- 
ners, bevor Sie das nächste Experiment beginnen. 


e) Löschen Sie mit der CLR-Taste den Bildschirm. (Der Cursor blinkt links oben.) Schrei- 
ben Sie 


2DA=7:B=9 
?A,B 

Jetzt geben Sie das Kommando 
RUN 


Dieses Ergebnis wollen wir kurz erläutern. Sie haben mit dem Kommando RUN folgen- 
des Programm ausgeführt: 

2DA=7:B=9 

30 ?A;B;C 
Die Zeile mit der Nummer 39 stand nämlich noch im Programmspeicher, auf den sich 


das Löschen des Bildschirms nicht ausgewirkt hat. Ausgegeben wurden daher die in Zei- 
le 20 gesetzten Werte und für C der Wert A 


f) Geben Sie nun folgende Zeilen ein: 


SO ?A;E;Z 
189 A >=1.1 
30E=-6-A12 
20 A=2.5 

49 Z=5E+3 
RUN 


Versuchen Sie kurz, die Ergebnisse zu deuten. Das wird Ihnen leichter fallen, wenn Sie 
sich das Programm anzeigen lassen. Schreiben Sie 


LIST 


Abgesehen von der Ungenauigkeit bei der Berechnung von E ist das Ergebnis wohl plau- 
sibel. 


g) Jetzt wollen wir das Programm löschen: 
NEW 
Wer mißtrauisch ist, mag den Erfolg mit LIST bzw. RUN kontrollieren. 


3.2 Variablen 13 


3.1 Zahlen 


Lassen Sie uns nun die Schreibregeln für Zahlen zusammenstellen. 


Eine Zahl wird als Folge von Dezimalziffern, ggf. mit einem Vorzeichen, geschrieben. 
Zahlen ohne Vorzeichen sind positiv. 
Zur Abgrenzung des gebrochenen vom ganzen Teil der Zahl dient der Dezimalpunkt! 


Hinter die Ziffernfolge dürfen der Buchstabe E und ein ganzzahliger Zehnerexponent 
gesetzt werden. 


Beispiele: 
-695 | 47.11 | 997 | + 79pE-2 | 7. 
Beispiele gleichwertiger Zahlen: 
05 | +95 | 5 | sıpe-3 | .905E2 | +.05E +91 o 


Es soll noch einmal betont werden, daß anstelle des bei uns üblichen Dezimalkommas in 
BASIC der Dezimalpunkt zu schreiben ist. Ungewöhnlich ist für manchen Leser wohl auch 
die halblogarithmische Zahldarstellung. Diese dient besonders bei Zahlen mit sehr großem 
oder sehr kleinem Betrag als abkürzende Schreibweise. 

Wer sich bei Übung f) darüber gewundert hat, daß Z den Wert 5®P0 trug, hat inzwischen 
wohl die Erklärung gefunden: 5E + 3 heißt 5 - 19° und nicht ‚5 mal E plus 3“. 


Auf eine genaue Erläuterung der rechnerinternen Zahldarstellung wird hier verzichtet. Wir 
wollen es bei dem Hinweis belassen, daß intern mit sog. Dualzahlen gearbeitet wird. Beim 
Übergang von der externen Dezimaldarstellung in die interne Dualdarstellung und umge- 
kehrt können Genauigkeitsverluste auftreten, wie Sie sie in Übung f gesehen haben. Für den 
Benutzer bedeutet das gewöhnlich keinen Nachteil. Hingegen muß der Programmierer die- 
sen Effekt beachten, wenn er zum Zweck der Programmsteuerung (s. Kap. 7) einen Ver- 
gleich von Zahlenwerten codiert. 


3.2 Variablen 


Größen wie A und B heißen in BASIC Variablen. 


Jeder Variablen wird automatisch ein Speicherplatz zugeordnet. 

Auf dem Platz einer Variablen steht zu jeder Zeit genau eine Zahl, der Variablenwert, 
der durch geeignete Anweisungen verändert werden kann. 

Eine Variable wird über ihren Namen angesprochen. 


Zu unterscheiden ist jeweils zwischen dem Variablennamen und dem Variablenwert. Den 
Namen dürfen Sie als Adresse eines Speicherplatzes ansehen, während der Inhalt dieses 
Platzes den Wert bildet. Zwei Variablen X und Y sind also nicht von vornherein verschie- 
den. Sie belegen zwar jede einen eigenen Platz, aber die Werte können gleich sein. 
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Wir müssen nun lernen, welche Variablennamen erlaubt sind. 


Variablennamen sind 1 oder 2 stellig. Das erste Zeichen muß ein Buchstabe, das 
zweite darf ein Buchstabe oder eine Ziffer sein. 


FN, GO, IF, ON, OR, ST, TI, TO 
dürfen nicht als Namen gewöhnlicher Variablen benutzt werden. 


Beispiele zulässiger Namen sind 
Ro|K|v2 . 


Es soll erwähnt werden, daß Ihr Rechner oft längere Namen zuläßt, z.B. ROSE oder ROST. 
Zur Identifizierung nutzt er aber nur die ersten beiden Zeichen, so daß RO, ROSE oder 
ROST demselben Speicherplatz zugeordnet sind. Wer diese Eigenart nicht ständig bedenkt, 
wird sich bei Verwendung längerer Namen manchen unnötigen Programmfehler einhandeln. 
Längere Namen werden zurückgewiesen, wenn sie ein BASIC-Wortsymbol enthalten (z.B. 
TO in OTTO). Das geschieht aber erst bei der Programmausführung, so daß Sie bei häufiger 
Verwendung eines solchen Namens viel Zeit für die Korrektur verschenken. Daher wird 
dringend geraten, für gewöhnliche Variablen höchstens 2 stellige Namen zu verwenden. 

TO ist als Variablenname verboten, weil es Bestandteil der Schleifenanweisung ist (s. Kap. 11). 
TI und ST sind Systemvariablen, die Sie zwar benutzen, aber nicht verändern dürfen. TI ent- 
hält die Zeit in sechzigstel Sekunden. Diese läuft vom Einschalten des Rechners bzw. von 
der letzten Wertzuweisung TI$= "'"hhmmss‘“, z.B. TI$ = 0855ß®“ (s. Abschnitte 3.5 und 
5.1). ST wird bei jeder Datenübertragung zwischen dem Rechner und einem Peripheriegerät 
vom Rechner gesetzt. Das bietet die grundsätzliche Möglichkeit, über den Wert von ST auf 
die Ursache eventueller Störungen zu schließen. 


3.3 Arithmetische Operatoren 


Die Übungen dieses Kapitels haben gezeigt, daß Ihr Rechner addieren (+), subtrahieren (-), 
multiplizieren (*), dividieren (/) und potenzieren (1) kann. Im Gegensatz zur gebräuchli- 
chen Formelschreibweise müssen Sie in BASIC das Symbol für die gewünschte Rechenart 
stets schreiben. Bei der Multiplikation wird das von Anfängern gern vergessen, zumal wir ja 
gewohnt sind, den Term 


2ab 
einer algebraischen Formel als Produkt ‚‚2 mal a mal b‘‘ zu verstehen. In BASIC muß es aber 
2*A*B 
heißen. 
Oft führt ein vergessener Stern zu einem Verstoß gegen die BASIC-Regeln (z.B. 2AB oder 
2A*B), so daß der Rechner Ihnen die Nummer der fehlerhaften Zeile angeben kann. Mehr 
Kopfzerbrechen werden Ihnen die Fälle bereiten, bei denen die BASIC-Anweisung inhalt- 


lich falsch, aber formal richtig ist. Wenn Sie für das obige Produkt 2*AB codieren, heißt das 
Multiplikation mit dem Wert der Variablen AB. Da jeder Variablen beim ersten Auftreten 
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ein Speicherplatz zugeordnet wird, ist ein Speicherplatzinhalt selbst dann vorhanden, wenn 
Sie den Variablenwert noch nicht definiert haben. 


Für den Fall, daß ein Operand wie die Zahl 7 in dem Ausdruck 

23-7/4 
zwischen zwei Operationszeichen steht, muß geregelt sein, in welcher Reihenfolge diese 
Operatoren abgearbeitet werden. Dazu wurde die bekannte Regel ‚Punktrechnung geht vor 
Strichrechnung‘ in BASIC übertragen und der Potenzierung ein noch höherer Rang einge- 
räumt. Soll von der hieraus resultierenden Reihenfolge bei der Berechnung eines Ausdrucks 


abgegangen werden, müssen Paare runder Klammern gesetzt werden. Damit ergibt sich fol- 
gende Rangordnung: 


| Rang | symbol | Bedeutung DD 


0 ( ) Klammern 
1 t 

2 * und / 

3 + und — 


Potenzierung 
Multiplikation und Division 

Falls ein Operand zwischen zwei Operatoren gleicher Rangstufe steht, wird der vordere 

der beiden zuerst wirksam. 










Addition und Subtraktion 





3.4 Arithmetischer Ausdruck 


Wenn man Zahlen oder Variablen durch arithmetische Operatoren verknüpft, erhält man ei- 
nen arithmetischen Ausdruck. 


Beispiele: 
Algebra BASIC 
atb A+tB 
(b - 7,5)c (B - 7.5)*C 
(x + 2y) 2[3* (X + 2#Y) 
_4 * 
DC A/(B*C) 
m. A/B*C 
2,5[3(x -7,1)+b)] 2.5*(3*(X - 7.1) + B) 
atb 
ab (A + B)/(C + D) 
a° + 3bx At5 + 3*B*X 
e+n Kt(5+N) o 


Als weiterer Bestandteil dürfen in arithmetischen Ausdrücken noch Funktionen (s. Kap. 12) 
auftreten. Diese repräsentieren jeweils eine Zahl, den Funktionswert. Zu beachten ist, daß 
das Argument der Funktion stets eingeklammert werden muß. 
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Beispieie: 


Algebra BASIC 

X SOR (X) 

1, % 1/A + SQR(B) 

Va,5y+t SOR (2.5*Y)+T 

va SOR ((3*N - 1)/(A + B)) 

_X-Y_ (X - YJ/(3*SQR (2*(U + 2))) e 


3V2(U + 2) 


Die Regeln für die Bildung arithmetischer Ausdrücke wollen wir noch einmal zusammenfas- 
sen: 


Ein arithmetischer Ausdruck enthält als Operanden Zahlen, Variablen oder Funk- 
tionen. 

Wenn 2 oder mehr Operanden auftreten, müssen sie durch arithmetische Operatoren 
verknüpft werden. 

Die Berechnungsreihenfolge ist grundsätzlich durch die Rangordnung der Operatoren 
bestimmt. 

Die Berechnungsreihenfolge kann über Paare runder Klammern gesteuert werden. 

Es dürfen überflüssige runde Klammernpaare gesetzt werden. 


3.5 Wertzuweisung 


Besondere Aufmerksamkeit verdienen die Zeilen, in denen ein Gleichheitszeichen steht, wie 
z.B. 
A = (22 - 29)*3/2 


Diese Zeile bewirkt folgende Aktionen: 


Subtrahiere 29 von 22. (Ergebnisist -7) 
Multipliziere - 7 mit 3. (Ergebnis ist - 21) 
Dividiere —- 21 durch 2. (Ergebnis ist - 19.5) 


Speichere — 19.5 auf dem Platz A. 

Sehen wir uns ein anderes Beispiel an. Die Zeile 
K=-Kt1l 

wird so verstanden: 


Hole die auf dem Platz K stehende Zahl. 
Addiere 1 hinzu. 
Speichere das Ergebnis auf dem Platz K. 
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Bei diesem Speichervorgang wird der alte Wert von K zerstört, so daß mit der Anweisung 
K=K + 1 die auf dem Platz K stehende Zahl um 1 erhöht wird. Hier zeigt sich deutlich der 
Unterschied zu mathematischen Gleichungen. Als Gleichung aufgefaßt wäre K=K + 1 un- 
sinnig; denn nach Subtraktion von K ergibt sich der Widerspruch 0 = 1. 

In BASIC bedeuten die hier erörterten Zeilen Wertzuweisungen. Sie bewirken, daß der Wert 
eines arithmetischen Ausdrucks berechnet und gespeichert wird. Wohin gespeichert werden 
soll, wird durch Angabe einer Speicherplatzbezeichnung vor dem Gleichheitszeichen festge- 
legt, während hinter dem Gleichheitszeichen steht, wie die fragliche Zahl zu ermitteln ist. 
Ein arithmetischer Ausdruck liefert nach seiner Auswertung eine Zahl. Wenn diese für eine 
spätere Verwendung gespeichert werden soll, müssen Sie eine Wertzuweisung codieren. 


| Die allgemeine Form der Wertzuweisung ist 
Variable = arithmetischer Ausdruck. 


Wie oben bereits erläutert, bewirkt diese Anweisung, daß der Wert des rechts stehenden 
Ausdrucks ermittelt und auf den Platz der links stehenden Variablen gespeichert wird. 


Daraus folgt beispielsweise, 
X=Uund U=X sind in BASIC nicht gleichwertig. 


Nach X = 1: U = 2: X = U haben beide Variablen den Wert 2. 
Nach X = 1: U = 2: U = X haben beide Variablen den Wert 1. 


Beispiel: Eine auf dem Platz X stehende Zahl, z.B. ein Preis in DM, soll auf die zweite 
Nachkommastelle gerundet werden. 

Bei derartigen Rundungsproblemen greift man auf die Funktion INT zurück (s. Kap. 12), 
mit der der ganzzahlige Teil einer Zahl ermittelt wird. INT (4.1) ergibt 4, aber INT (4.99) 
ebenfalls. Übliche Rundungskonvention hingegen ist, ab einschließlich 9.5 aufzurunden. 
Um dafür INT einsetzen zu können, muß für eine Rundung das Argument vorher um 9.5 
erhöht werden. INT (4.99 + 9.5) ergibt genauso wie INT (4.5 + 9.5) und INT (5.49 + 9.5) 
eine 5. In unserem Beispiel muß vor und nach dem Abschneiden des gebrochenen Teils 
noch um 2 Dezimalstellen verschoben werden. Daher lösen wir unser Problem mit der Wert- 
zuweisung 


X = B.D1*INT (100*X + 0.5) nd 


3.6 Integer-Variablen 


Für Leser, die nur gelegentlich programmieren wollen oder wenig Programmiererfahrung 
haben, ist der in diesem Abschnitt dargestellte Stoff entbehrlich. Sie sollten diesen Abschnitt 
übergehen. Wir haben ihn nur aufgenommen, um denen, die besonders große und besonders 
komplizierte Programme erstellen, weitergehende Möglichkeiten des cbm-BASIC aufzuzei- 
gen. 

Für numerische Probleme steht ein zweiter Variablentyp zur Verfügung: Integer. 


Namen von Integer-Variablen bestehen aus dem Namen einer gewöhnlichen Variab- 
len, dem das Prozentzeichen angefügt ist. 
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Beispiele zulässiger Integer-Namen sind 

A% | BI% | HH% e 
Zwischen einer Integervariablen und der gewöhnlichen Variablen, die man nach Weglassen 
des Prozentzeichens erhält, besteht kein zwangsläufiger Zusammenhang. Beide dürfen im 
selben Programm auftreten. 
Integervariablen sind nur zur Speicherung ganzer Zahlen geeignet. Sie belegen intern mit 
16 bit deutlich weniger Speicherplatz als gewöhnliche Variable, für die 40 bit benötigt 
werden. Dieser Vorteil muß jedoch mit längeren Programmlaufzeiten bezahlt werden. 
Schließlich ist zu bedenken, daß die Werte der Integervariablen zwischen - 32768 und 
+ 32767 liegen müssen. 


Neben der Verwendung in arithmetischen Ausdrücken dürfen Integer-Variablen auch mit 
den logischen Operatoren NOT, AND und OR verknüpft werden, die dann bitweise wirken. 
Eine weitergehende Erläuterung hierzu finden Sie in den com-Handbüchern. 


3.7 Aufgaben 


3-1] Welche Funktion hat das Fragezeichen? Ist sein Platz in der Eingabezeile für seine Funk- 
tion wesentlich? 

3-2 Übertragen Sie den Ausdruck a? + ab + b? in BASIC und lassen Sie ihn für a= 2 und 
b = 3 berechnen. 


3-3 Codieren Sie in BASIC: S.7° Lassen Sie den Ausdruck zur Kontrolle für x = 12,25, 
y = 3,5 und z = 3,5 berechnen. 
_y\2 
3-4 Lassen Sie —. berechnen und speichern. Zeigen Sie das Ergebnis auf dem Bild- 


schirm an. Benutzen Sie die Zahlen aus Aufgabe 3-3. 


3-5 Was ist eine Variable? 
Wie werden Variablennamen geschrieben? 
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4 Programmaufbau und -ausführung 


In diesem Kapitel wollen wir üben, mit Programmen umzugehen. 

Zur Vermeidung von Irrtümern wird betont, daß in den nachstehenden Übungen — und 
das gilt auch für die weiteren Kapitel — jeweils nur aufgeführt ist, was Sie schreiben sollen. 
Auf dem Bildschirm werden weitere Zeilen erscheinen, die der Rechner von sich aus zeigt. 


a) Schreiben Sie die folgenden Zeilen: 


NEW 
LIST 
20A=2 
70?A 
6BA=A+I 
A=5 
LIST 
Beachten Sie die unterschiedliche Wirkung des LIST-Kommandos. 
b) Lassen Sie das Programm ausführen, nachdem Sie den Wert von A überprüft haben. 
Schreiben Sie deshalb 
A 
RUN 
Wiederholen Sie das Ausführungskommando: 
RUN 
c) Das Programm kann auch anders gestartet werden. Schreiben Sie 
GOTO 69 
Setzen Sie jetzt fort mit 
A=20 
GOTO 69 


Da das Programm zwischenzeitlich nicht verändert wurde, sind die unterschiedlichen Er- 
gebnisse durch verschiedene Startwerte von A bedingt. Welche Startwerte wurden tat- 
sächlich benutzt? Ist das Programm wirklich unverändert geblieben? Lassen Sie es zur 
Kontrolle anzeigen. 


d) Nun wollen wir das bisher benutzte Programm verändern. Schreiben Sie 


20A=5:B=3 
80?A,B 
70B=B-1 


RUN 
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Starten Sie das Programm noch einmal mit 
GOTO79 
Die Deutung der Ergebnisse wird sicher erleichtert, wenn Sie das Programm vor Augen 
haben. Schreiben Sie deshalb 
LIST 
e) Auch auf folgende Weise kann ein Programm gestartet werden: 


RUN 79 
Rekonstruieren Sie die benutzten Startwerte. 


f) Schreiben Sie jetzt 
RUN 
LIST 69 
Bewegen Sie den Cursor auf das Plus-Zeichen, betätigen die Minus-Taste und dann die 
RETURN-Taste. Setzen Sie den Cursor unter READY und starten Sie das Programm er- 
neut. 


4.1 Programmbegriff 


In Kapitel 1 haben wir den Begriff Programm inhaltlich erklärt als zeitliche Folge der An- 
weisungen, die ein vorgelegtes Problem lösen. Daneben steht der rein formale Programmbe- 
griff Ihres Rechners. Wie Sie sich erinnern, werden Zeilen, die nicht mit einer Zahl begin- 
nen, nach Betätigung der RETURN-Taste sofort ausgeführt. Die anderen hingegen werden 
gespeichert. 
Ein Programm ist die Gesamtheit der im Rechner gespeicherten, mit einer Zahl be- 
ginnenden Zeilen. 


Es obliegt dem Programmierer, die beiden Programmbegriffe zur Deckung zu bringen. 


Neben der erwähnten Kennzeichnung der Programmzeilen dient die Zeilennummer noch 
verschiedenen anderen Zwecken. Das Programm aus Übung a) hätten Sie auch in der Rei- 
henfolge 


70? A 
6BA=A+1 
20A=2 


eingeben können. Wenn Sie sich dann mit LIST das aktuelle Programm zeigen lassen, erhal- 
ten Sie wieder 


20A=2 
6BA=A+I 
70?A 


Ausschlaggebend sind also die auftretenden Zeilennummern und nicht ihre Reihenfolge bei 
der Eingabe. Halten wir fest: 


Die Programmzeilen werden vom Rechner aufsteigend nach der Zeilennummer 
sortiert. 
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Diese Reihenfolge ist auch für die Programmausführung maßgebend, solange nicht mit 
speziellen Anweisungen in den Ablauf eingegriffen wird. 


Die Programmzeilen werden in aufsteigender Folge der Zeilennummern ausgeführt. 


Mitunter ist es angebracht, mehrere Anweisungen in eine Zeile zu schreiben. Dabei ist zu 
beachten: 


Wenn in einer Zeile mehrere Anweisungen stehen, müssen sie durch einen Doppel- 
punkt getrennt werden. 


Stehen in einer Zeile mehrere Anweisungen, werden sie von links nach rechts abge- 
arbeitet. 


Dem Anfänger wird jedoch geraten, nur eine Anweisung pro Zeile zu schreiben. Außerdem 
sollte er sich angewöhnen, Zeilennummern nicht fortlaufend, sondern mit einer Schritt- 
weite von mindestens 1® zu vergeben. Ist beides beachtet worden, wird es nämlich beson- 
ders einfach, in einem bestehenden Programm Anweisungen zu ergänzen, und das ist selbst 
nach längerer Programmiererfahrung oft erforderlich. 

Neben den ausführbaren Anweisungen dürfen in ein Programm auch Bemerkungen einge- 
fügt werden. 


Bemerkungen schreibt man in der Form 
REM beliebiger Text. 


Beispiel: 15 REM PROGRAMM XXX © 


Formal werden Bemerkungen wie gewöhnliche Anweisungen behandelt. Der Unterschied 
zeigt sich erst während der Programmausführung. Wenn der BASIC-Interpreter das Befehls- 
kennwort REM findet, ignoriert er den Rest der Zeile. Daher dürfen Sie Bemerkungen auch 
hinter ausführbare Anweisungen setzen, natürlich durch einen Doppelpunkt getrennt. 


4.2 Programmkorrektur 


Nehmen wir an, zwischen B=B- 1 und ?A, B in Übung d) soll die Anweisung ?A*B einge- 
fügt werden. Dann gelingt das durch die Zeile 


75?A*B 
Diese wird ja wegen der automatischen Sortierung zwischen die Zeilen mit den Nummern 
70 und 80 eingeschoben. Merken wir uns: 


Eine Anweisung wird in ein Programm eingefügt, wenn man sie als Zeile mit einer ge- 
eigneten neuen Zeilennummer eingibt. 


Lassen Sie uns nun verfolgen, was in Übung d) bei der Eingabe der Zeile 


20A=5:B=3 
in das Programm 

20A=2 

6A=-A+HI 


70?A 
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passierte, das die Zeile 29 schon enthielt. Das LIST-Kommando zeigte uns die Wirkung: 


20A=5:B=3 
6BA=AH+1 
USW. 


Die alte Zeile 29 ist also durch die neue ersetzt worden. Diesen Vorgang nutzen wir für das 
Ändern von Anweisungen: 


Eine Zeile wird geändert, indem man ihre Zeilennummer und den vollständigen neuen 
Zeileninhalt eingibt. 


Auf dem gleichen Prinzip basiert auch das Löschen einzelner Anweisungen. Wollen wir etwa 
die Zeile 

6A=-A+I 
entfernen, überschreiben wir sie durch 

60 (RETURN-Taste nicht vergessen!) 


Eine Zeile wird gelöscht durch Eingabe der betreffenden Zeilennummer (und Betäti- 
gung der RETURN-Taste). 


Mit dem NEW-Kommando wird das ganze Programm gelöscht. 


Das Ändern von Zeilen scheint auf den ersten Blick unbefriedigend, weil selbst bei Korrek- 
tur nur eines Zeichens die ganze Zeile eingegeben werden muß. Bei genauerer Betrachtung 
zeigt sich aber, daß nicht alle Zeichen der Zeile neu geschrieben werden müssen. Eingeben 
in den Rechner heißt doch, die RETURN-Taste zu drücken, wobei die Bildschirmzeile über- 
geben wird, in der der Cursor gerade blinkt. Es ist gleichgültig, wie diese Bildschirmzeile ent- 
standen ist. Sie dürfen auch nach einem LIST-Kommando den Cursor in die zu ändernde 
Zeile bewegen. Dann nehmen Sie die notwendigen Änderungen vor, notfalls unter Einschluß 
der Tasten INST und DEL, und drücken die RETURN-Taste. 


4.3 Anzeige von Programmzeilen 


Das oben geschilderte Vorgehen bei der Korrektur von Anweisungen wird noch effektiver, 
wenn man jeweils nur einen Teil des Programms auflistet. In Übung f) haben Sie bereits ge- 
sehen, wie eine einzelne Zeile aus dem Programmspeicher auf den Bildschirm geholt wird. 
Daneben stehen aber weitere Varianten des LIST-Kommandos zur Verfügung, die nachste- 
hend aufgeführt sind. 


Kommando Wirkung 

LIST führt zur Anzeige des ganzen Programms 

LISTm-n zeigt die Zeilen von Nummer m bis einschließlich Nummer n 
LIST-n zeigt die Zeilen von Nummer ® bis einschließlich n 

LISTm- zeigt die Zeilen von Nummer m bis einschließlich Nummer 63999 


LISTk zeigt die Zeile k 
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Wenn Sie einen Abschnitt Ihres Programms auflisten lassen, geschieht das gewöhnlich 
schneller, als Sie lesen können. Sie können das Tempo einer Bildschirmausgabe jedoch 
beeinflussen: 


Ständiges Niederhalten der CTRL-Taste führt zu langsamer Ausgabe. 


In der gleichen Weise können Sie auch die Geschwindigkeit reduzieren, mit der Ihre Pro- 
gramme Ausgaben auf dem Bildschirm zeigen (s. Kap. 5). 


4.4 Programmausführung 


Die Ausführung eines Programms kann mit verschiedenen Kommandos veranlaßt werden. 
Im Normalfall ist das RUN, womit das Wort und nicht die RUN-Taste gemeint ist. 


| Nach RUN wird das Programm ausgeführt. Begonnen wird in der Zeile mit der klein- 
sten Zeilennummer. 


Als Nebenwirkung des RUN-Kommandos ist zu notieren, daß zu Beginn der Ausführung 
alle numerischen Variablen den Wert ® haben. 


| RUN löscht alle Variablen. 


In der Testphase bringt es oft Vorteile, einen Lauf mitten im Programm zu beginnen und 
nicht bei der kleinsten Zeilennummer. Für diese Verlegung des Programmanfangs auf eine 
Zeile mit der Nummer n gibt es 2 Kommandos. Sie unterscheiden sich in ihrer Wirkung auf 
die Variablen. Diese können wahlweise gelöscht oder ihre aktuellen Werte beibehalten wer- 
den. 
Nach GOTO n wird bei Zeilennummer n beginnend das Programm ausgeführt. Die 
Variablen behalten ihren aktuellen Wert. 
Nach RUN n wird bei Zeilennummer n beginnend das Programm ausgeführt. Alle Va- 
riablen werden gelöscht. 


Beispiele sehen Sie in den Übungen c) und e). 
Ein weiteres Spezialkommando gestattet die Fortsetzung des Programms nach einer Unter- 
brechung. 
Nach einer Unterbrechung wird mit CONT die Programmausführung fortgesetzt. Die 
Variablen behalten ihren aktuellen Wert. 
Nach einer Fehlermeldung kann nicht mit CONT fortgesetzt werden. 
Zwei Möglichkeiten zur Unterbrechung eines Programms durch einen Eingriff des Be- 
nutzers (der Erfolg wird durch READY angezeigt) wollen wir hier nennen. 
Mit der STOP-Taste kann das Programm unterbrochen werden. 


Wenn Eingabedaten erwartet werden, müssen Sie bei gedrückter STOP-Taste zusätz- 
lich die RESTORE-Taste betätigen. 
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Die Ausführung eines Programms kann auch durch einprogrammierte Anweisungen beendet 
werden. 


END beendet die Ausführung. 
STOP unterbricht die Ausführung unter Angabe der aktuellen Zeilennummer. 


Gerade in der Testphase werden Sie von STOP gern Gebrauch machen. Sie sehen, an 
welcher Stelle sich das Programm gerade befindet, können die Variablenwerte mit Be- 
fehlen der Art 

?X 
überprüfen und die Ausführung anschließend fortsetzen. 
Was ist aber zu tun, wenn Sie einen geringfügigen Fehler entdeckt haben und nach dessen 
Behebung den Programmlauf mit den aktuellen Variablenwerten fortsetzen wollen? Die so- 
fortige Korrektur fehlerhafter Zeilen entfällt; denn bei jedem Eingriff in den Programm- 
speicher werden alle Variablen gelöscht. Hingegen dürfen Sie wie in Übung c) Variablen- 
werte setzen, d.h. fehlerhafte Zahlen korrigieren. Als Kommando für die Fortsetzung des 
Programmlaufs stehen Ihnen dann CONT oder GOTO mit geeigneter Zeilennummer n zur 
Verfügung. 


4.5 Speicherbelegung 


In Kapitel 2 wurde schon erwähnt, daß der Speicher Ihres Rechners verschiedene Bereiche 
enthält. In einem sind alle Bildschirmzeilen abgelegt, in einem anderen die Programmzeilen, 
und in einem dritten Bereich liegen die Variablen. Sie kennen bereits Kommandos und Spe- 
zialtasten (z.B. NEW, CLR), mit denen einzelne dieser Bereiche gelöscht werden. Daneben 
haben Sie in den obigen Übungen gesehen, daß der Variablenbereich auch durch das RUN- 
Kommando gelöscht wird, während die Variablen bei einem Programmstart mit einem 
GOTO-Kommandb erhalten bleiben. 

Auch für die Belegung der 3 genannten Speicherbereiche gibt es mehrere Varianten. Welche 
Eingabe- und Löschmöglichkeiten Ihnen zur Verfügung stehen, können Sie aus Bild 4.1 ent- 
nehmen. 


4.6 Aufgaben 





Bildschirm 


















Programmtext 


Variablen 
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— NEW-Kommando 
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Bild 4.1: Speicherbelegung 


4.6 Aufgaben 


4-1 Wozu dient die STOP-Taste? 
4-2 Geben Sie folgendes Programm ein: 


19A = 4 
2DA = A*X 
30? A 


— Zeilennummer und 





(auch programmierbar) 






— Eingabe von Programmtext 


25 


Wie können Sie im voraus sicherstellen, daß keine weiteren Zeilen im Programmspeicher 


stehen? 


Wie können Sie im nachhinein nachweisen, daß keine weiteren Programmzeilen ge- 


speichert sind? 


4-3 Starten Sie das Programm aus Aufgabe 4-2. 
Warum wird die Zahl ® ausgegeben? 


4-4 Wie können Sie ohne Programmänderung erreichen, daß das Programm aus Aufgabe 
4-2 eine 1 ausgibt? 
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5 Ausgabe auf den Bildschirm 


Wie wir schon aus Kapitel 2 wissen, werden die Ergebnisse eines Programmlaufs mit dem 
PRINT-Kommando auf dem Bildschirm angezeigt. Außerdem wissen wir, daß wir dieses 
Kennwort nicht ausschreiben müssen, sondern mit dem Fragezeichen abrufen können. In 
diesem Kapitel, besonders in den Experimenten, sollen Sie nun das Ausgabekommando 
näher kennenlernen. 
a) Löschen Sie den Programmspeicher und schreiben Sie 
xX=31:2°’X“ 
Anschließend 
?%X 
und dann 
? X - . x 
b) Schreiben Sie 
100 E = 1.2E4 
110 U$ = "UMSATZ =“ 
139 ?U$;E;’DM“ 
Lassen Sie das Programm ausführen. 
c) Ergänzen Sie jetzt die Zeile 
120 2? ’IYTAGES“; 


wobei jeder der Pfeile das einmalige Betätigen der Taste “Cursor abwärts‘ symbolisiert. 
Lassen Sie das Programm erneut laufen, und sehen Sie sich die Abstände zwischen den 
Zahlen und Strings genau an. (Ein String ist eine Zeichenkette wie z. B. DM.) 


d) Ersetzen Sie in Zeile 130 die Semikolons durch Kommas und sehen Sie sich an, wie da- 
durch die Ausgabezeile verändert wird. 
e) Schreiben Sie 
110 T1$ = "’EINNAHMEN“ 
120 T28 = ’KOSTEN“: K = 9.63*E 
130 T3$ = "GEWINN‘“:G =E-K 
140 ?T18;E: ?T2$;K: ?:? T38;G 
und lassen Sie das Programm laufen. 
f) Jetzt wollen wir die Zahlen als Kolonne schreiben. Ergänzen Sie in Zeile 149 hinter je- 
dem der 3 Semikolons 
TAB (12); 
und starten Sie das Programm erneut. 
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g) Die Position eines Ausgabewertes kann nicht nur absolut, sondern auch relativ zum Vor- 


gänger positioniert werden. Dafür müssen Sie in Zeile 149 alle TAB-Angaben entfernen 
und wie folgt ersetzen: 

SPC (3) zwischen die Semikolons vor E 

SPC (7) zwischen die Semikolons vor K 

SPC (7) zwischen die Semikolons vor G 


Sehen Sie sich die Wirkung an. 


h) In dieser Übung sollen die Pfeile folgende Bedeutung haben: ? = HOME-Taste, 1 = CLR- 


Taste, Y = Cursor abwärts, > = Cursor nach rechts. Schreiben Sie jetzt: 


NEW 

10 Z$= “NT YYyyyyyy4J" 
20 s$ =/ 22222222 
30 IP “ 


40 INPUT”X “X, Y 

80 ?LEFT$ (Z$, Y+1); LEFT$ (S$, X-1); ”*“: 
90 GOTO 49 

RUN 


Daraufhin wird ein Fragezeichen erscheinen. Tippen Sie nun zwei durch ein Komma ge- 
trennte Zahlen aus dem Bereich von 1 bis 19, z.B. 


4, 1 (und natürlich die RETURN-Taste). 


Geben Sie andere Zahlenpaare ein, bis Sie den Zusammenhang zwischen Ihren Eingabe- 
werten und der Lage der Sterne erkennen. 


Falls Ihr Rechner mit einem Farbfernseher verbunden ist, sollten Sie gelegentlich bei 
niedergehaltener CTRL-Taste eine der Ziffern 1 bis 8 drücken und sich die Auswirkung 
ansehen. 

Beenden Sie die Ausführung des Programms. Wenn Sie nicht mehr wissen, wie das geht, 
sehen Sie in Abschnitt 4.4 nach. 


Ändern Sie das Programm jetzt in folgender Weise: 


(Dabei bedeuter (1), daß Sie die CTRL-Taste niederhalten und dann die im Kreis stehen- 
de Ziffer tippen sollen. Y heißt, daß Sie entsprechend mit der SHIFT-Taste verfahren.) 


EISEIDIDIENKDKDIONGDKEE 
EIDIEID) 


40 Z=1 + INT(RND(TI)*19) 

59 S = 1 + INT(RND(TI)*19) 

60 F=1 + INT(RND(TI)* 8) 

78 A=1+INT(RND(TI)* 4) 

80 PRINT LEFT$ (Z$, Z+1);LEFT$ (S$, S); MID$ (F$, F, 1); MID$ (A$, A, 1) 
RUN 


Daraufhin sollte ein Tanz bunter Symbole beginnen, den Sie mit der STOP-Taste been- 
den können. 
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5.1 Textdarstellung 


Sie haben gesehen, daß der Rechner sowohl Zahlen als auch Zeichenketten ausgeben kann. 
Soll der Inhalt des Speicherplatzes X dargestellt werden, schreibt man 


%X 
Durch die Anweisung 
PR“ 
wird dagegen der Buchstabe X ausgegeben, ein sog. String. 


Ein String ist eine Folge beliebiger Zeichen, die am Anfang und am Ende durch An- 
führungszeichen begrenzt ist. 

Alle Spezialtasten mit Ausnahme der DEL-Taste werden nicht sofort ausgeführt, son- 
dern als Teil des Strings gespeichert (und ggf. später ausgeführt), wenn sie innerhalb 
der Anführungszeichen betätigt werden. 


Bei der Korrektur von Tippfehlern beim Aufbau eines Strings werden Sie die Cursor-Steuer- 
tasten womöglich vermissen. Anstatt mit der DEL-Taste rückwärts alle Zeichen bis zum 
Fehler zu löschen, können Sie auch wie folgt vorgehen: Sie schreiben den String zu Ende 
und drücken die RETURN-Taste. Danach funktionieren die Spezialtasten wieder normal. 
Sie können den Cursor auf die fehlerhafte Stelle fahren, korrigieren in gewohnter Weise und 
geben erneut die RETURN-Taste. 

Die Programmierbarkeit der Spezialtasten bietet dem Benutzer u. a. die Möglichkeit, vor 
der eigentlichen Ausgabe den Bildschirm zu löschen. Dieses Löschen geschieht ja mit der 
CLR-Taste (SHIFT nicht vergessen!), die in einen String zu setzen ist. Die Anweisung sieht 
dann so aus: 


pP v « 
Der Bildschirm wird gelöscht, wenn diese Anweisung ausgeführt wird. 
Die vorangegangenen Übungen haben ferner gezeigt, daß es im cbm-BASIC neben den oben 
erklärten String-Konstanten auch String-Variable gibt. In Zeile 119 aus Übung b) haben wir 
davon Gebrauch gemacht und den String "UMSATZ = “ auf der Variablen U$ gespeichert. 


Namen von Stringvariablen bestehen aus dem Namen einer gewöhnlichen Variablen, 
dem das Dollarzeichen angefügt ist. 
TI$ ist eine Systemvariable, sie enthält die Zeit in der Form "hhmmss“. 
Abgesehen von den Systemvariablen TI und TI$ besteht zwischen einer Stringvariablen und 
der gewöhnlichen Variablen, die man nach Weglassen des Dollarzeichens erhält, kein 


zwangsläufiger Zusammenhang. Bei der Vergabe von Namen für Stringvariable braucht man 
keine Rücksicht auf benutzte gewöhnliche Variablen zu nehmen und umgekehrt. 


5.2 Ausgabeanweisung 


Fast alle bisherigen Übungen enthielten Ausgabeanweisungen. Deshalb sind Ihnen die nach- 
folgenden Regeln für diesen Befehlstyp wahrscheinlich schon geläufig. 


5.3 Positionierung der Ausgabe 29 


Die allgemeine Form der Ausgabeanweisung lautet 

PRINT Liste bzw. ?Liste 

In der Liste stehen Strings (als Konstante oder Variable) oder arithmetische Aus- 
drücke (s. Kap. 3). 

Die Bestandteile der Liste müssen durch Komma oder Semikolon getrennt, die Liste 
darf mit einem solchen Trennzeichen beendet werden. 


Die Liste darf fehlen. 


Durch die Ausgabeanweisung werden die Strings oder die Werte der arithmetischen Aus- 
drücke aus der Liste auf dem Bildschirm dargestellt. Deshalb mutet es wohl seltsam an, daß 
diese Liste fehlen darf. In diesem Falle wird natürlich nichts ausgegeben. Es wird nur der 
Cursor an den Anfang der nächsten Bildschirmzeile gesetzt. 


Zum Platzbedarf der Ausgabe auf dem Bildschirm ist festzuhalten: 


Ein String belegt für jedes seiner Zeichen eine Stelle. 


Der Platzbedarf einer Zahl wird durch die Anzahl ihrer Ziffern festgelegt zuzüglich 
einer Stelle für das Vorzeichen. 


Sollen in einer Zeile mehr Zeichen ausgegeben werden als der Bildschirm darstellen 
kann, wird der Überhang in die nächste Zeile gesetzt. 


5.3 Positionierung der Ausgabe 


Wenn Sie die Übungen c) und d) korrekt ausgeführt haben, haben Sie (beim VC 20) folgende 
Ausgabezeilen erhalten. 


Bei c: TAGESUMSATZ = 12000 DM 
Bei d: TAGESUMSATZ = 
12000 DM 


Das Komma in der Ausgabeliste führt also zu größeren Abständen als das Semikolon. Be- 
achten Sie auch, daß das Wort TAGES mit der Ausgabeanweisung aus Zeile 12® und der 
Rest mit der aus Zeile 130 geschrieben wurde. So können die Daten einer Bildschirmzeile 
also von verschiedenen PRINT-Anweisungen stammen, während die Daten einer PRINT-An- 
weisung stets in eine Bildschirmzeile gesetzt werden. Der genaue Aufbau der Ausgabezeilen 
wird verständlich, wenn Sie sich folgende Regeln ansehen. 


Jede 1. Stelle (11. beim VC 20) der Ausgabezeile ist vortabuliert. Mit dem Komma 
wird zur nächsten Tabulatorstelle vorgerückt. 

Hinter einem arithmetischen Ausdruck bewirkt das Semikolon einen Abstand von ei- 
ner Stelle zum nächsten Zeichen. Hinter einem String unterdrückt das Semikolon den 
Vorschub. 

Endet eine PRINT-Anweisung nicht mit einem Trennzeichen, steht der Cursor vor 
der nächsten Ein- oder Ausgabe am Anfang der nächsten Zeile. 


Von diesen Standardfestlegungen für eingeschobene Leerstellen und Tabulatorpositionen 
kann jedoch abgewichen werden. Dazu muß in die Ausgabeliste vor den Wert, der absolut 
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(TAB) oder relativ zum Vorgänger (SPC) positioniert werden soll, eine entsprechende An- 
gabe eingefügt werden. Diese sollte durch Semikolons begrenzt werden, weil ihre Wirkung 
sonst durch die Vorschubwirkung des Kommas verfälscht wird. 


Mit SPC (n) werden n Leerstellen ausgegeben. 
Mit TAB (n) wird hinter die nte (also auf die (n + 1)te) Ausgabestelle vorgerückt. 


Als n darf ein arithmetischer Ausdruck geschrieben werden, dessen Wert zwischen 
Ö und 255 liegt. 


Beachten Sie, daß mit TAB nicht zurückgegangen werden kann. Die TAB-Anordnung wird 
ignoriert, wenn der Cursor schon hinter der angesprochenen Position steht. Außerdem müs- 
sen Sie bedenken, daß Sie z.B. mit TAB(1) auf die 2. Stelle der aktuellen Zeile positionie- 
ren. Diese Ungereimtheit liegt daran, daß rechnerintern die 1. Stelle die Adresse ®, die 

2. Stelle die Adresse 1 hat usw., so daß mit TAB (n) auf die nte Stelle bei interner Zählwei- 
se vorgerückt wird, und das ist die (n + 1)te Stelle bei der üblichen Zählweise. 


Während mit den bisher vorgestellten Sprachelementen die Ausgabe jeweils relativ zur vor- 
herigen positioniert wird, hat Übung h) gezeigt, daß unabhängig von der Vorgeschichte 
feste Bildschirmpositionen angesteuert werden können. Lassen Sie uns kurz darauf ein- 
gehen. 

Grundlegende Voraussetzung ist die Programmierbarkeit der Spezialtasten (s. Abschnitt 
5.1). Man legt je eine Stringvariable mit ‘““Cursor-rechts‘‘- und ”’Cursor-abwärts‘‘-Tasten an 
und setzt an den Anfang einer dieser Variablen die HOME-Taste. In Übung h) war das Z$. 
Wer den ganzen Bildschirm erreichen will, muß die beiden Strings entsprechend verlän- 
gern. Ist dann — gezählt von der linken oberen Ecke — die Bildschirmposition bekannt, bei 
der ein Ausgabewert beginnen soll, müssen in dem zugehörigen PRINT-Befehl zuvor ent- 
sprechende Teile der vorgenannten Strings mit ausgegeben werden. Wichtig ist, mit dem 
String zu beginnen, der die HOME-Taste enthält, und als Trennzeichen das Semikolon zu 
verwenden. Das Begrenzen der Teilstrings geschieht mit der LEFT$-Funktion (s. Kap. 13). 
So bedeutet z.B. LEFT$ (Z$, N), daß die vorderen N Zeichen des Strings Z$ zu nehmen 
sind. 


5.4 Farbige Ausgabe 


Die Übungen h) und i) haben gezeigt, wie in einfacher Form die Farbe der auszugebenden 
Zeichen gesteuert wird. 


Die Ausgabefarbe wird festgelegt, wenn bei niedergehaltener CTRL-Taste eine der 
Ziffern 1 bis 8 eingegeben wird. 


Bemerkenswert ist, daß auch diese Farbwahl programmierbar ist. Setzt man eine dieser 
Tastenkombinationen in einen String ein, bleibt die Ausgabefarbe zunächst unverändert. 
Die Farbfestlegung wird erst wirksam, wenn der String mit einer PRINT-Anweisung auf 
dem Bildschirm ausgegeben wird. 

Davon haben wir in Übung i) Gebrauch gemacht. Der String F$ enthielt alle möglichen 
Farbfestlegungen. In Zeile 88 wurde mit MID$ (F$, F, 1) (s. Kap. 12) die Farbe aktiviert, 
die dem Wert von F entspricht. Die Berechnung von F in Zeile 60 geschah so: 


5.5 Aufgaben 31 


Der Zufallszahlengenerator RND (s. Kap. 12) liefert Zahlen zwischen Ö und 1 ausschließ- 
lich der Grenzen. Diese werden mit 8 multipliziert, und dann wird durch die Funktion INT 
(s. Kap. 12) der gebrochene Anteil weggeschnitten. Es ergeben sich also Werte zwischen ® 
und 7 einschließlich der Grenzen, und nach Addition von 1 liegt F zwischen 1 und 8. 


5.5 Aufgaben 


An dieser Stelle scheint ein grundsätzlicher Hinweis zur Bearbeitung der Aufgaben ange- 
bracht. 


Je weiter Sie sich die Sprache BASIC erarbeiten, desto unwahrscheinlicher wird es, daß 

Ihre Lösungen mit den angegebenen Musterlösungen identisch sind. Sie brauchen also einen 
anderen Weg, um Ihre Lösung überprüfen zu können, Benutzen Sie dafür den Rechner, wann 
immer das möglich ist! 


Auch wenn im Aufgabentext nicht ständig darauf hingewiesen wird, kann fast immer mit 
wenigen Zusatzbefehlen ein kleines Programm formuliert werden, das die aktuelle Aufgabe 
einschließt. Lassen Sie dieses Programm laufen, sehen Sie sich Zwischenergebnisse an, vari- 
ieren Sie die Ausgangswerte, und Sie werden bald erkennen, ob Sie die jeweilige Aufgabe 
gelöst haben. Schon die nachstehenden Aufgaben sollten Sie in diesem Stil bearbeiten. 


5.1] Wir nehmen an, daß auf den Variablen A und B Zahlen mit je max. 5 Ziffern stehen. 
Schreiben Sie eine Ausgabeanweisung, mit der der Wert von A ab Stelle 12 und der 
Wert von B in der gleichen Zeile ab Stelle 3 ausgegeben werden. 


5-2 Wie erreichen Sie mit getrennten Ausgabeanweisungen für A und B die gleiche Ausga- 
bezeile wie in Aufgabe 5-1? 


5-3 Der Inhalt des Speicherplatzes G, hier durch xxx repräsentiert, soll in folgender Form 
ausgegeben werden: 
GEWICHT: xxxKG 
Schreiben Sie die Ausgabeanweisung hierfür so, daß vor und hinter xxx möglichst 
wenig Leerstellen auftreten. 
5-4 Wie erreichen Sie folgende Anordnung der Ausgabe? 
GEWICHT 
xxx KG 
Dabei sollen vor Gewicht 3 Leerstellen erscheinen und für Werte von G zwischen 
100 und 999 soll KG unter HT stehen. 
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6 Eingabe 


Damit Sie Ihre Programme vielfach und vor allem unverändert verwenden können, müssen 
Sie diese weitgehend unter Benutzung von Variablen formulieren. Als Konstante sollten 
Sie nur Universalkonstanten, wie z.B. z, oder Systemkonstanten einprogrammieren. Dar- 
unter versteht man Zahlen, die für eine Problemklasse konstant sind, aber nicht das Einzel- 
problem beschreiben. So könnte man die 2 in der Kreisumfangsformel U = 2rR als System- 
konstante bezeichnen, während der Radius R natürlich den konkreten Kreis beschreibt. 
Die Kenngrößen des speziellen Problems müssen dem Rechner bekannt gemacht werden. 
Da Sie diese aber nicht als Konstanten einprogrammieren sollen, müssen Sie Eingabeanwei- 
sungen (INPUT, READ) für entsprechende Variablen schreiben. Die Zahlen werden dann 
während der Ausführung aus einer DATA-Zeile (READ) oder einer Bildschirmzeile (INPUT) 
entnommen. Dieses Zusammenspiel soll jetzt geübt werden. 


a) Löschen Sie den Programmspeicher und schreiben Sie 
2DATA4,5,6, 7 
3ÖREAD A, B: ?A;B, 
4ÖREAD A: ?A 
Starten Sie das Programm. 
b) Ergänzen Sie 
1DATA 3 
RUN 
Wenn Sie das Ergebnis registriert haben, starten Sie erneut mit 
GOTO39 
c) Falls die Übung b) nicht mit einer Fehlermeldung endete, haben Sie einen Fehler ge- 
macht. Wiederholen Sie b) ggf. in der vorgeschriebenen Form. Danach ergänzen Sie 
SÖRESTORE 
Geben Sie erneut 
RUN 
und nach dem Durchlauf erneut 
GOTO3® 
Lassen Sie sich das Programm anlisten, und versuchen Sie kurz, die Ergebnisse zu ver- 
stehen. 


d) Löschen Sie das alte Programm und schreiben Sie 
2BINPUT S1, S2 
4 ?’SUMME =";S1 +S2 
RUN 
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Daraufhin erscheint ein Fragezeichen, mit dem Ihr cbm-Rechner Sie auffordert, Daten 
für eine INPUT-Anweisung einzugeben. Schreiben Sie 2 Zahlen, die Sie durch ein Kom- 
ma trennen müssen (z.B. 8,4) und betätigen Sie die RETURN-Taste. 


e 


a 


Fügen Sie zwischen INPUT und S1 folgende Zeichen ein: 

’SUMMANDEN“; 
Starten Sie das Programm. Jetzt wäre es vernünftig, wie bei d) eine Datenzeile mit 2 Zah- 
len aufzubauen. Versuchen Sie es statt dessen mit nur einer Zahl und der RETURN- 
Taste. 
Geben Sie noch eine Zahl ein, und es erscheint wieder die Summe beider Zahlen. 


f) Starten Sie das Programm erneut und drücken Sie nach dem Erscheinen des Frage- 
zeichens die STOP-Taste. Was passiert? 


Halten Sie nun die STOP-Taste nieder und betätigen gleichzeitig die RESTORE-Taste. 


g) Schreiben Sie 
18INPUT”EINHEIT“; E$ 


und ergänzen am Ende von Zeile 49 
;E8 

Starten Sie das Programm. Als aktuellen Wert für E$ können Sie z.B. die Zeichenfolge 
D-MARK 

wählen. Die Zahlen geben Sie am besten wie in Übung d) ein. 


6.1 Eingabe während des Programmlaufs 


Wir haben eingangs schon betont, daß problembezogene Daten über Eingabeanweisungen 

in das Programm einfließen sollten. Ein gängiges Prinzip ist, das Programm während der 
Programmausführung zu unterbrechen, wenn neue Daten benötigt werden, und diese Unter- 
brechung dem Benutzer anzuzeigen. Hier geschieht das mit einem Fragezeichen. Daraufhin 
gibt der Benutzer über den Bildschirm bzw. die Tastatur die Daten ein, und das Programm 
wird automatisch fortgesetzt. 


Diese Eingabeanweisung hat die Form 
INPUT Variablenliste bzw. 
INPUT ”Text“; Variablenliste 


In der Liste stehen Variablennamen, die durch Kommas zu trennen sind. 


Besonders bei Programmen mit mehreren INPUT-Anweisungen empfiehlt sich die zweite 
Form. Bei ihr erscheint später als Zeichen der Programmunterbrechung der hinter INPUT 
gesetzte Text und dann das Fragezeichen. Dadurch wird es möglich, die verschiedenen Lese- 
befehle zu kennzeichnen oder gar dem Benutzer Hinweise für die Dateneingabe zu geben. 

In der Variablenliste dürfen beliebige Variablen stehen. Beim Aufbau der Datenzeilen ist je- 
doch zu beachten, daß die Daten zum jeweiligen Variablentyp passen, also z.B. kein String 
geschrieben wird, wenn in der Liste eine gewöhnliche Variable an der Reihe ist. 
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Damit das Programm nach der Unterbrechung für eine INPUT-Anweisung fortgesetzt 
wird, müssen soviel Daten eingegeben werden, wie Variablen in der Liste stehen. 

Die eingegebenen Daten werden der Reihe nach den Variablen der Variablenliste zu- 
geordnet. 

Die Daten für eine INPUT-Anweisung dürfen in eine Zeile geschrieben werden, müssen 
es aber nicht. 

Innerhalb einer Zeile werden Daten durch Kommas getrennt. 


Beispiel: 

Wir wollen ein Programm schreiben, das das Volumen eines Ziegelsteines berechnet. Wenn 
wir die Kantenlängen mit L, B und H bezeichnen, erhalten wir das Volumen als V = L*B*H. 
Um möglichst flexibel zu bleiben, wollen wir alle Kantenlängen im Programm als Variable 
behandeln und deren Werte über einen Lesebefehl festlegen. Anschließend kann das Volu- 
men berechnet und ausgegeben werden. Schließlich bieten wir dem Benutzer noch die Mög- 
lichkeit, das Ergebnis mit einem beliebigen Text TE$ zu kennzeichnen. 


Bild 6.1 zeigt Ihnen, wie diese Aktionenfolge als Ablaufplan dargestellt wird. Übertragen wir 
diesen Plan in BASIC: 

10INPUTLL, B, H, TE$ 

20V = L*B*H 

30?TE$; V 


Eingabe: 
L,B,H,TE$ 


V=L*B*H 


. Ausgabe: 
Bild 6.1 Quadervolumen TER: y 





Nachdem Sie dieses Programm gestartet haben, werden Sie aufgefordert, Daten einzugeben. 
Diese können Sie auf viele Arten anordnen. Zwei davon seien hier aufgeführt. 


Version 1: 

?24.0,11.5,7.1, NORMALFORMAT RETURN-Taste 
Version 2: 

?24.0,11.5,7.1 RETURN-Taste 


?NORMALFORMAT RETURN-Taste 
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Die Eingabe der 4 genannten Größen hätten wir auch mit folgenden Anweisungen erreichen 
können: 


18 INPUT ”LAENGE“;L 
12 INPUT "’BREITE‘;B 
14 INPUT "HOEHE‘;H 
16 INPUT ’TEXT‘;TE$ 


In diesem Fall spielt sich bei der Dateneingabe folgender Dialog ab: 


LAENGE? 28.5 RETURN-Taste 
BREITE? 13.5 RETURN-Taste 
HOEHE? 8.5 RETURN-Taste 


TEXT? KLOSTERFORMAT RETURN-Taste 


Zur Klarstellung sei noch einmal betont, daß die Zeileninhalte bis einschließlich der Frage- 
zeichen bei der Ausführung der INPUT-Anweisungen von Ihrem Rechner stammen, wäh- 
rend Sie den Rest der Zeilen schreiben. Dabei hätten Sie die Strings auch durch Anführungs- 
zeichen begrenzen dürfen. 


Sie werden es schon selber bemerkt haben, aber trotzdem sei darauf hingewiesen, daß unser 
Programm mehr kann, als in der Aufgabenstellung gefordert ist. Die Ursache liegt primär in 
dem notwendigen Abstraktionsprozeß, der bei komplexeren Problemen oft Kopfzerbrechen 
bereitet, hier jedoch kaum bewußt wurde: wir haben den Stein als Sonderfall eines Quaders 
erkannt. Durch die Verwendung allgemein gehaltener Texte und vor allem der Textvariab- 
len haben wir dann konsequent das durch die Abstraktion verallgemeinerte Problem ‚‚Qua- 
dervolumen‘‘ programmiert. © 


6.2 Eingabe vor dem Programmstart 


Die Dateneingabe über die INPUT-Anweisung wird unbefriedigend, wenn für einen Pro- 
grammdurchlauf relativ viele Eingabedaten erforderlich sind. Entdecken Sie nämlich einen 
Fehler in den Daten erst, nachdem die betreffende Datenzeile per RETURN-Taste an das 
Programm übergeben wurde, müssen Sie in der Regel das Programm neu starten und alle 
Daten neu eingeben. Um so etwas zu vermeiden, ist es oft besser, zuerst alle Daten zu schrei- 
ben, zu speichern, ggf. zu korrigieren und erst dann das Programm zu starten. Damit gehö- 
ren die in Ihrem cbm-Rechner gespeicherten Daten zwar formal zum Programm (s. Ab- 
schnitt 4.1), aber es macht weniger Mühe, korrekte Eingabewerte bereitzustellen. 


Derartige Programmzeilen, die Daten für einen Leseprozeß enthalten, werden durch das 
Kennwort DATA bezeichnet. 

Der Aufbau der DATA-Anweisung ist 

DATA Werteliste 

Die Daten in der Werteliste werden durch Kommas getrennt. 


Wenn die Daten von einer anderen Stelle gelesen werden sollen als bei INPUT, bedarf es na- 
türlich eines weiteren Eingabekommandos: READ. 
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Diese Eingabeanweisung hat die Form 
READ Variablenliste 
In der Liste stehen Variablennamen, die durch Kommas zu trennen sind. 


Beispiele für READ und DATA kennen Sie schon aus den Übungen a) bis c). Sehen Sie sich 
noch einmal an, wie das Zusammenspiel zwischen diesen beiden Anweisungsarten in Übung 
b) ablief. Zunächst erhielten A den Wert 3 und B den Wert 4. Ein READ versorgte sich also 
aus verschiedenen DATA-Anweisungen. Das anschließende READ A brachte A den Wert 5. 
Eine DATA-Anweisung konnte also abschnittsweise von verschiedenen READ-Anweisungen 
gelesen werden. Beim zweiten Durchlauf reichten dann die Daten nicht, so daß eine Fehler- 
meldung erfolgte. Diese Meldung wurde in Übung c) vermieden, aber hier brachte der zwei- 
te Durchlauf auch die gleichen Zahlen wie der erste. Lassen Sie uns diese Beobachtungen 
nun in Merkregeln umsetzen. 

Die Daten aus allen DATA-Anweisungen werden der Reihe nach den Variablen aus 

den ausgeführten READ-Anweisungen zugeordnet. 

Mit Hilfe eines sog. Pointers merkt sich der Rechner, wie weit die DATA-Anweisun- 

gen schon abgearbeitet wurden. 

Mit RESTORE wird der Pointer in seine Ausgangsstellung zurückgesetzt, also an den 

Anfang der ersten DATA-Anweisung. 
Es gibt keine bindende Vorschrift für die Anordnung der DATA-Zeilen innerhalb des Pro- 
gramms. Im Hinblick auf die Eigenarten des Lesens aus den DATA-Zeilen und deren be- 
queme Änderung sollte man diese totale Freizügigkeit jedoch nicht ausnutzen. Der Autor 


rät Ihnen statt dessen, alle DATA-Anweisungen an den Anfang des Programms zu setzen 
und hierfür fortlaufende Zeilennummern zu verwenden. 


6.3 Einzelzeichen-Eingabe 


Wer in der Programmierung wenig erfahren ist, sollte diesen Abschnitt übergehen. Die hier 
dargestellte Eingabevariante bietet zwar interessante Möglichkeiten, aber deren sinnvolle 
Nutzung setzt voraus, daß man die Programmsteuerung (s. Kap. 7) beherrscht. 


Mit GET steht ein Eingabe-Kommando zur Verfügung, mit dem bei jeder Ausführung ein 
Zeichen in den Rechner übernommen werden kann. 


Die Eingabe eines Zeichens von der Tastatur kann programmiert werden mit 
GET Variable 
Es darf eine gewöhnliche oder eine Stringvariable benutzt werden. 


Das Programm wird durch GET nicht unterbrochen, so daß es auch nicht wie bei INPUT 
nach der Dateneingabe mit der RETURN-Taste fortgesetzt werden muß. 


Da bei Verwendung gewöhnlicher Variabler das Programm abbricht, falls ein nichtnemeri- 
sches Zeichen eingegeben wird, sollte im GET stets eine Stringvariable benutzt werden. 
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Außerdem empfiehlt sich i. a. eine Warteschleife wie z. B. 
5 GET A$:: IF A$ =" "THEN 50 


wobei die Anführungszeichen unmittelbar hintereinander zu setzen sind. 

Als weiteres Anwendungsbeispiel wollen wir eine von außen gesteuerte Mehr-Wege-Ver- 
zweigung nennen, mit der bei einem Eingabewert von 1 nach 1®@P, bei 2 nach 2009 und 
bei 3 nach 30®Q gesprungen wird: 


50 GET A$ : ON VAL(A$) GOTO 1960, 2009, 3060 : GOTO 56 
Bei der Benutzung des GET-Befehls sollte bedacht werden, daß die Zeichen unmittelbar 


aus dem Tastaturpuffer gelesen werden. Dieser Puffer kann bis zu 1® Zeichen enthalten, 
die von den GET-Anweisungen des Programms der Reihe nach eingefragt werden. 


In analoger Weise können einzelne Zeichen von einem Peripheriegerät geholt werden. Das 
Kommando lautet dann GET #k, Variable. Es setzt ein OPEN für die Kanalnummer k vor- 
aus (s. Kap. 8 und 9). 


6.4 Aufgaben 


6-1 Durch eine INPUT-Anweisung soll der Variablen T$ der 7stellige String ABC, DEF zu- 
gewiesen werden. Wie müssen Sie die Datenzeile schreiben? 

6-2 Benutzen Sie statt der INPUT- eine READ-Anweisung. Wo bzw. wie müssen Sie jetzt 
den String ABC, DEF schreiben? 

6-3 Eine Ausgabezeile für die Werte von zwei Variablen können Sie alternativ mit einer 
PRINT- oder mit zwei PRINT-Anweisungen schreiben. Können Sie dementsprechend 
eine Datenzeile mit 2 Zahlen alternativ mit einem oder zwei Lesebefehlen lesen? 
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7 Verzweigungen 


In den bisherigen Übungen und Beispielen haben wir nur lineare Programme geschrieben: 
Bei jedem Durchlauf wurde jede Anweisung genau einmal ausgeführt. Von dieser Programm- 
struktur wollen wir nun abgehen. 


a) Schreiben Sie 


10 INPUT”Z',Z:? 

20 IF Z<BTHEN?’REN“; 
36 ”"TIER“:?: GOTO 19 
RUN 


Geben Sie im unregelmäßigen Wechsel positive und negative Zahlen ein und registrieren 
Sie den Zusammenhang zwischen Eingabe- und Ausgabewerten. 


b) Löschen Sie in Zeile 20 die zwischen der Zeilennummer und dem Fragezeichen (bzw. 
PRINT) stehenden Zeichen und lassen Sie das Programm mit den gleichen Zahlen wie in 
Übung a) laufen. (Falls keine Unterschiede auftreten, haben Sie nach dem Löschen wahr- 
scheinlich die RETURN-Taste vergessen. Lassen Sie sich die Zeile 2® zeigen und korri- 
gieren Sie sie wie vorgeschrieben.) 


c) Schreiben Sie 


30 ?A*B:GOTO1P 
10 INPUT”A, B“‘;A,B 
20 IFA=BOR B=$ THEN?”NULL“: GOTO 1 


Lassen Sie auch dieses Programm laufen. Wählen Sie die einzugebenden Zahlenpaare so, 
daß gelegentlich, aber nicht immer eine Null vorkommt. 


d) Schreiben Sie 


10 S=0 

20 Z=RND(TI):S=S+Z: ?Z 
30 IFS<=7THEN GOTO 29 
40 ?’SUMME“;S 


Geben Sie mehrfach das RUN-Kommando und prüfen Sie jeweils, daß die Differenz der 
letzten beiden Zahlen die 7 noch nicht übersteigt. 


e) Löschen Sie in Zeile 3Ö das Kommandowort GOTO, so daß die Zeile auf THEN 29 en- 
det. Überzeugen Sie sich, daß das Programm genau so arbeitet wie bisher. Die ausgege- 
benen Zahlen wiederholen sich allerdings im allgemeinen nicht, weil wir in Zeile 2® ei- 
nen Zufallszahlengenerator (RND) benutzen. 
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f) Schreiben Sie 

10 INPUT’Z‘;Z 

208 ON Z GOTO 49, 10, 30, 49 

30 2:2?” A:?: GOTO 19 

40 2:2°’B:2:GOTO 19 
Starten Sie das Programm, geben Sie in beliebiger Reihenfolge ca. 19 Zahlen zwischen 
Q und 6 ein und registrieren Sie den Zusammenhang zwischen Ihrer Eingabe und der 
Ausgabe. 


7.1 Sprunganweisung 


Wir haben in früheren Beispielen gesehen, daß die Programmzeilen aufsteigend nach Zeilen- 
nummern sortiert und in dieser Reihenfolge abgearbeitet werden. Durch besondere Anwei- 

sungen, sog. Verzweigungen, kann jedoch von dieser ‚natürlichen‘‘ Reihenfolge abgewichen 
werden. 

Die einfachste Verzweigung ist die Sprunganweisung, in der wir die Nummer der Zeile vor- 

geben, mit der die Programmausführung fortgesetzt werden soll. 


Die allgemeine Form der Sprunganweisung ist 

GOTO.n 

Darin bedeutet n die Nummer einer im Programm vorhandenen Zeile. 

Die Wirkung sahen Sie z.B. in Übung a). Nach jeder Ausgabe des Wortes TIER (Zeile 3$) 
wurde von Ihnen die Eingabe einer Zahl gefordert (Zeile 19). 

Die Übungen d) und e) haben gezeigt, daß ein bedingter Sprung (s. Abschnitt 7.3) auch kür- 
zer codiert werden kann. 


In einer bedingten Sprunganweisung braucht statt THEN GOTO n nur THEN n 
geschrieben zu werden. 








Schon mit der einfachen GOTO-Anweisung können wir die lineare Struktur unserer bishe- 
rigen Programme aufweichen. Beispielsweise werden reine Berechnungsprogramme oft so 
eingesetzt, daß das Programm mehrfach unmittelbar nacheinander mit verschiedenen Daten 
ausgeführt wird. Dazu mußten wir bisher nach jedem Durchlauf das Programm neu starten. 
Das können wir sparen, wenn wir ans Programmende einen unbedingten Sprung zur ersten 
ausführbaren Anweisung setzen. 


Damit erhält das Programm die Struktur einer unendlichen Schleife. Solange bei jedem 
Durchlauf garantiert eine INPUT-Anweisung erreicht wird, ist das fehlende Ende aber kein 
Nachteil. Beim INPUT hält das Programm an, und der Benutzer entscheidet über Fort- 
setzung (Daten und RETURN-Taste) oder Abbruch (STOP- und RESTORE-Taste). 
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7.2 Berechneter Sprung 


Der einfache Sprung bewirkt die Fortsetzung des Programms an stets der gleichen Stelle. 

Die bedingte Sprunganweisung (s. Abschnitt 7.3) gestattet dagegen, eine Alternative zu 
programmieren: entweder wird gesprungen oder nicht. Daneben enthält das com-BASIC 
noch den berechneten Sprung, mit dem aus einer Menge von Zeilennummern eine ausge- 
wählt wird, um dort die Ausführung fortzusetzen. Sie kennen diese Anweisung aus Übung f). 
Dort wurde ’’B‘‘ ausgegeben, wenn der ganzzahlige Teil der eingegebenen Zahl 1 oder 4 

war. Bei 2 wurde sofort zum Lesebefehl verzweigt, und in den anderen Fällen wurde die 
Zeile 30 ausgeführt, d. h. bei ®, bei 3 und von 5 an aufwärts. 

Lassen Sie uns die Regeln für diesen Anweisungstyp zusammenstellen: 


Die allgemeine Form der berechneten Sprunganweisung ist 

ON aGOTO nl, n2,..., nk 

Darin sind n1 bis nk die Nummern im Programm vorhandener Zeilen und a ein nicht 

negativer arithmetischer Ausdruck. 
Wenn der ganzzahlige Teil von a 1 ist, wird zur Zeile nl verzweigt, ist er 2, wird bei Zeile n2 
fortgesetzt usw. Es wird nicht gesprungen, sondern die Ausführung in der nachfolgenden 
Zeile fortgesetzt, wenn der ganzzahlige Teil von a gleich ® oder größer als k ist. 


7.3 Bedingte Anweisung 


In den Übungen, z.B. in Übung a), haben Sie erlebt, daß eine Anweisung (PRINT ”’REN“) 
gelegentlich nicht ausgeführt wurde. Sie war als bedingte Anweisung codiert und wurde nur 
erreicht, wenn Sie eine negative Zahl Z eingegeben hatten. In Übung b) wurde hingegen je- 
desmal REN geschrieben, so daß die Bedingung offenbar durch den Teil der Zeile 2® aus- 
gedrückt war, den Sie in Übung b) gelöscht haben. 

Was hier am Beispiel einer Ausgabeanweisung demonstriert wurde, ist durchweg erlaubt. 
Die Ausführung jeder Anweisung (Ausnahme: FOR, s. Kap. 11) kann vom Vorliegen be- 
stimmter Bedingungen abhängig gemacht werden. 


Die allgemeine Form der bedingten Anweisung ist 

IF Bedingung THEN Anweisung 
Wenn die Bedingung verletzt ist, wird die hinter THEN stehende Anweisung, der sog. Ja- 
Ast, ignoriert und sofort die nachfolgende Zeile abgearbeitet. Ist die Bedingung erfüllt, wird 
der Ja-Ast ausgeführt. Dieser darf mehrere durch Doppelpunkt getrennte Anweisungen ent- 
halten, die entweder alle ignoriert oder alle ausgeführt werden. Endet der Ja-Ast nicht mit 
einer Sprunganweisung, wird anschließend die nachfolgende Zeile abgearbeitet. 


Bedingungen werden oft als Vergleich geschrieben. 


Ein Vergleich besteht aus 2 arithmetischen Ausdrücken oder 2 Strings (den Operan- 
den) und einem Vergleichsoperator. 
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Wenn al und a2 Operanden des gleichen Typs bezeichnen, sind folgende Vergleiche 


möglich: 

BASIC Bedeutung 
al<a2 al kleiner als a2 
al = a2 al gleich a2 
al>a2 al größer als a2 


al>=a2 al größer oder gleich a2 
al<>a2 al ungleich a2 
al<=a2 al kleiner oder gleich a2 


Strings werden von vorne her zeichenweise verglichen, bis 2 unterschiedliche Zeichen auf- 
treten. Auf der Basis des zur internen Zeichendarstellung verwendeten Codes (ASCII: 
American Standard Code for Information Interchange) ergibt sich die Größenrelation zwi- 
schen den Zeichen. Diese stimmt überein mit der üblichen lexikografischen Anordnung, 
wobei die Ziffern noch vor den Buchstaben rangieren. Falls ein String mit dem Anfang ei- 
nes anderen völlig übereinstimmt, gilt der kürzere als kleiner. 


Für den Bereich numerischer Vergleiche sind mit der obigen Regel auch Bedingungen wie 
in Übung a) oder d) erfaßt; denn ein arithmetischer Ausdruck (vgl. Abschnitt 3.4) kann bis 
auf eine Konstante oder eine Variable abmagern. Es geht aber auch komplizierter, wie 
Übung c) zeigt. 


Wenn b1 und b2 zulässige Bedingungen (z.B. Vergleiche) bezeichnen, dürfen folgende 
Bedingungen formuliert werden: 


BASIC Bedeutung 
NOT b1 Negation von b1 
bl ANDb2 bl und b2 
bl OR b2 b1 oder b2 


Da ‚kleiner oder gleich‘‘ das Gegenteil (die Negation) von „größer“ ist, sind z.B. folgende 
Bedingungen gleichwertig: 


al<=a2 entspricht NOT al >a2 


Für den Gebrauch von AND und OR sei daran erinnert, daß eine mit ‚‚und‘ gebildete Ge- 
samtbedingung b1 und b2 erfüllt ist, wenn beide Einzelbedingungen erfüllt sind. Bei ‚‚oder““ 
hingegen ist die Gesamtbedingung b1 oder b2 erfüllt, wenn mindestens eine Einzelbedin- 
gung erfüllt ist. So wurde in Übung c) das Wort NULL geschrieben, wenn Sie eine oder zwei 
Nullen eingegeben hatten. 


Eine Erläuterung der Aussagenlogik kann hier nicht erfolgen, weil sie zu weit vom Thema 
dieses Buches wegführt. Wer programmieren will, sollte die Regeln der formalen Logik je- 
doch kennen und über die obigen Andeutungen hinaus z.B. in der Lage sein, zusammenge- 
setzte Aussagen (Bedingungen) zu negieren. Wenn Sie auf diesem Gebiet Wissenslücken 
spüren, sollten Sie sie, vielleicht mit Hilfe der einschlägigen Literatur, beizeiten beseitigen. 


Nachdem wir in diesem Kapitel weitere Operatoren kennengelernt haben, müssen wir noch 
einmal die Frage ihrer Priorität aufgreifen. Wie bei den arithmetischen Operatoren kann 
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auch hier durch Paare runder Klammern vorgeschrieben werden, in welcher Reihenfolge 
die in einem Ausdruck auftretenden Operatoren abgearbeitet werden sollen. Soweit davon 
kein Gebrauch gemacht wird, gilt folgende 


Rangordnung der Operatoren: 


Rang Operator 
1 t 
+] 
+ —_ 
Vergleichsoperatoren 
NOT 
AND 
OR 


SO 2 Ww%DM 


Beispiel: 
Ein zentrales Problem der Programmierung ist die Berechnung von Summen mit variabler 
Anzahl von Summanden. Den prinzipiellen Lösungsweg hierfür wollen wir am nachstehen- 
den Problem aufzeigen. 
Der Rechner kann Zufallszahlen erzeugen, die zwischen ® und 1 liegen. Wir wollen diese 
Zahlen solange aufaddieren, bis die Summe den Wert 7 übersteigt, und uns zur Kontrolle 
die Zahlen und ihre Summe ausgeben lassen. Da die Anzahl der Summanden nicht bekannt 
ist, können wir keine Additionsanweisung mit entsprechender Anzahl von ‚‚+‘-Zeichen 
formulieren. Wir müssen stattdessen mit einer Zeile der Form 

S=5+tZ 
nur eine Zufallszahl Z verarbeiten und diese Anweisung mit jeweils neuem Z so oft aus- 
führen wie nötig. Bei dieser Technik hat S die Bedeutung ‚Teilsumme der bislang addierten 


a) b) 


Z = Zufallszahl 
S=-S+tZ 












RND(TI) 
StZ 


Z 
5 








Ausgabe: 
”Summe=‘S 






Bild 7.1 Summe von Zufallszahlen 


Zahlen‘. Nach jedem Durchlauf ändert sich der Wert von S, so daß eine Folge von Teilsum- 
men entsteht. Wir brechen die Berechnung ab, wenn der richtige Summenwert erreicht ist 
(s. Bild 7.1, Version a). 
Die Summe ist natürlich nur korrekt, wenn vor der Verarbeitung der ersten Zufallszahl S 
den Wert ® hat. Außerdem sollten die Zahlen und ihre Summe ausgegeben werden, so daß 
sich der Plan aus Bild 7.1, Version b, ergibt. Eine Übertragung dieses Ablaufplans in ein 
BASIC-Programm erübrigt sich, da Sie das Programm in Übung d) schon geschrieben haben. 
© 


7.4 Aufgaben 


7-1 Das Minimum a, der Zahlen a,,a,,... , a, Ist charakterisiert durch 
Am Sa,i=1,2,..n 


Schreiben Sie ein Programm, das aus 3 einzulesenden Zahlen das Minimum a, be- 
stimmt und ausgibt. Verwenden Sie keine indizierten Variablen. 


7-2 Schreiben Sie ein Programm, das bei beliebiger Anzahl n das Minimum von a, , a;, ..., 
A. ermittelt und ausgibt. Lesen Sie als erstes die Anzahl n. Verwenden Sie keine indi- 
zierten Variablen. 


7-3 In einem Lager befinden sich n verschiedene Artikel. Vom i-ten Artikel sind a; Stück 
vorhanden, und der Preis für ein solches Stück ist P;. Schreiben Sie ein Programm, das 
für den gesamten Lagerbestand den durchschnittlichen Stückpreis DP ermittelt. Die 
Formel dafür lautet 


Bauen Sie das Programm so auf, daß die Preise (langfristig konstant) über READ/DATA- 
Anweisungen und die Stückzahlen (täglich veränderlich) über INPUT-Anweisungen ge- 
lesen werden. Verwenden Sie keine indizierten Variablen. 
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8 Benutzung des Recorders 


Das Kassettenlaufwerk bietet die Möglichkeit, Programme auf gewöhnlichen Kassetten zu 
archivieren. Legen Sie eine leere Kassette ein und lassen Sie uns das Speichern und Laden 
von Programmen üben. 


a) Betätigen Sie am Recorder die Rücklauftaste (REW). Während die Kassette zurückgespult 
wird, erstellen Sie ein einfaches Programm: 


10 INPUT "BASIS, EXPONENT“; B,E 
20 ?BtE: GOTO 19 


b) Wenn die Kassette zurückgespult ist, lösen Sie die REW-Taste und schreiben 


SAVE POTENZ“ 


| Daraufhin werden Sie aufgefordert, am Recorder die Tasten REC und PLAY gleichzei- 
tig zu drücken. Tun Sie es, und beachten Sie den Bildschirm. 


c) Nachdem das Speichern beendet ist (Anzeige READY) lösen Sie die Tasten REC und 
PLAY (mit der STOP-Taste des Recorders) und erstellen ein zweites Programm: 


18 INPUT ”FAKTOR 1, FAKTOR 2“; A,B 

20 ?A*B: GOTO 19 
Speichern Sie auch dieses Programm: 

SAVE ’PRODUKT“ 
Nach Beendigung dieses Vorganges löschen wir den Programmspeicher und kontrollie- 
ren den Löscherfolg: 


NEW 
LIST 


d) Nun spulen Sie die Kassette zurück (Taste REW am Recorder), lösen anschließend die 
REW-Taste und schreiben dann 


LOAD "PRODUKT 


Wenn nicht nach spätestens 5 Minuten der Ladevorgang abgeschlossen ist, brechen Sie 
ihn ab (Tasten STOP am Rechner und STOP am Recorder). In diesem Fall wiederholen 
Sie den Punkt d), und falls das Laden wieder mißlingt, beginnen Sie noch einmal bei 
Punkt a) und halten sich genau an den vorgeschriebenen Übungsplan. 


Ist das Programm geladen, überprüfen Sie den Erfolg mit 
LIST 
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e) Jetzt soll das andere Programm geladen werden. Überlegen Sie, was dafür zu tun ist. 


Sind Sie auch auf die nachstehende Aktionenfolge gekommen? 
Kassette zurückspulen, REW-Taste lösen, LOAD "POTENZ“ schreiben. 
Wenn das Programm "’POTENZ“ geladen ist, lösen Sie die PLAY-Taste. 


Schreiben Sie 
15?”BHOCHE ="‘; 


Dieses modifizierte Programm soll jetzt zusätzlich zu den beiden anderen gespeichert 
werden. Deshalb muß zunächst die Kassette bis ans Ende des Programms ’’PRODUKT“ 
vorgesetzt werden. Dazu schreiben Sie 


VERIFY 

Nach Aufforderung drücken Sie die PLAY-Taste und warten, bis die Meldungen 
FOUND PRODUKT 
VERIFYING 


VERIFY ERROR 
READY 


erscheinen. Lösen Sie die PLAY-Taste. Versuchen Sie, in Anlehnung an die Übung c) 
das im Speicher befindliche Programm unter dem Namen "POT 2“ auf die Kassette zu 
bringen. 


a. 
a 


8.1 Speichern von Programmen 


Der cbm-Rechner betrachtet alle in seinem Programmspeicher stehenden Zeilen als ein Pro- 
gramm. Weil daher zu jeder Zeit nur ein Programm bekannt ist, ist ein Programmname zur 
Unterscheidung von Programmen nicht nötig. Auch wenn wir Programme auf Kassetten 
speichern, sind Namen nicht erforderlich, selbst dann nicht, wenn mehrere Programme auf 
einer Kassette stehen. Im Hinblick auf den effektiveren Gebrauch werden wir gespeicherte 
Programme jedoch grundsätzlich mit Namen versehen. Sie sollten die Namen aber mög- 
lichst kurz wählen, damit bei einer Bezugnahme der Schreibaufwand und vor allem das 
Fehlerrisiko klein bleiben. 


Um Schwierigkeiten beim späteren Laden der Programme zu vermeiden, sollten Sie keine 
Namen verwenden, die komplett mit dem Anfang eines anderen Namens übereinstimmen. 
Z.B. sind die Namen RUND und RUNDUNG ungünstig, während UND mit jedem der an- 
deren beiden Namen verträglich ist. 


Ein Programm wird auf Kassette gespeichert mit SAVE "’Name““. 

Der Name wird auf 16 Zeichen beschränkt. 
Nach dem SAVE-Kommando werden Sie aufgefordert, die Tasten REC und PLAY am 
Recorder zu drücken. Das muß gleichzeitig erfolgen, und beide Tasten müssen einrasten. 


Voraussetzung für den Erfolg ist, daß bei der Eingabe des SAVE-Kommandos keine der 
Recorder-Tasten REW, FFWD oder PLAY eingelegt ist, weil der Rechner sonst einen fal- 
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schen Betriebszustand des Recorders unterstellt. Wir wollen betonen, daß das Programm 
auch nach dem Speichern, dessen Abschluß durch READY angezeigt wird, im Speicher 
des Rechners vorhanden ist. 


Wenn Sie das SAVE-Kommando gegeben und die geforderten Tasten eingelegt haben, wird 
die Kassette von der momentanen Position des Schreibkopfes an beschrieben. Das stört 
nicht, solange Sie stets pro Kassette nur ein Programm aufnehmen und die Kassette vor 
dem SAVE-Kommando zurückspulen. Es ist jedoch denkbar, daß Ihnen bei fleißiger Pro- 
grammierung die große Anzahl von Kassetten bald lästig wird. 


Wollen Sie mehrere Programme pro Kassette speichern, müssen Sie in der Lage sein, vor ei- 
nem anstehenden SAVE-Kommando die Kassette bis hinter das letzte darauf befindliche 
Programm vorzusetzen. Dafür existiert aber kein Spezialbefehl. Man kann jedoch den ge- 
wünschten Effekt mit dem VERIFY-Kommando erreichen. 


Mit VERIFY veranlassen Sie, daß das nächste auf der Kassette gefundene und das im 
Rechner gespeicherte Programm auf völlige Übereinstimmung geprüft werden. 


Das Kommando heißt VERIFY. 


Sie werden nach dem Kommando aufgefordert, die PLAY-Taste des Recorders zu drücken. 
Gewöhnen Sie sich an, diese nach erfolgter Prüfung wieder zu lösen; denn sonst wird Ihnen 
ein geplantes SAVE mißlingen. 


Ob die Prüfung Übereinstimmung ergab oder nicht, in jedem Fall ist die Kassette bis hinter 
das Programmende vorgesetzt worden. Wenn sich auf der Kassette ein weiteres Programm 
anschließt, wiederholen Sie das VERIFY-Kommando und gelangen damit an das Ende die- 
ses Programms. Auf diese Weise können Sie die Kassette bis hinter das letzte darauf befind- 
liche Programm vorsetzen und das neue Programm dahinter abspeichern. Sie müssen aller- 
dings bei jedem VERIFY genau wissen, ob noch ein Programm folgt; denn sonst läuft die 
Kassette bis zum Ende durch, und Sie können das aktuelle Programm nicht mehr speichern. 


8.2 Laden von Programmen 


Ein auf Kassette gespeichertes Programm können Sie in den Programmspeicher Ihres cbm- 
Rechners laden. 


Das Ladekommando heißt 
LOAD ”’Name‘“ bzw. nur LOAD 


Sie werden aufgefordert, am Recorder die PLAY-Taste zu drücken. Haben Sie nur LOAD 
gesagt, wird das erste gefundene Programm genommen. Falls Sie einen Namen angegeben 
haben, wird die Kassette vorwärts bis zum fraglichen Programm gelesen und dieses geladen. 
Der Suchprozeß wird als erfolgreich angesehen, sobald der Anfang des gespeicherten Na- 
mens und der im LOAD genannte Name identisch sind. Wenn der gespeicherte Name länger 
ist, werden die hinteren Zeichen ignoriert. 

Oft werden Sie das soeben geladene Programm ausführen lassen wollen und deshalb mit 
dem RUN-Kommando fortsetzen. Für diesen Fall können Sie Ihren Schreibaufwand mitun- 
ter reduzieren, wenn Sie die RUN-Taste betätigen, die das LOAD- und RUN-Kommando 
zusammenfaßt. 
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Mit der RUN-Taste wird das erste auf der Kassette gefundene Programm geladen und 
gestartet. 


Natürlich werden Sie auch hier aufgefordert, die PLAY -Taste zu drücken. 


8.3 Bearbeitung von Datenbeständen 


Kassetten eignen sich grundsätzlich auch zur Aufnahme von Datenbeständen. Das Ausgabe- 
kommando PRINT kann so modifiziert werden, daß die Ausgabezeile nicht zum Bildschirm 
sondern zum Recorder geschickt und dort gespeichert wird. Entsprechend läßt sich auch 
mit einem abgewandelten INPUT eine Datenzeile vom Recorder holen. 


’ 


Bei praktischen Anwendungen geht es jedoch kaum um die Bearbeitung weniger Datenzei- 
len, sondern es sind größere Datenmengen zu speichern bzw. zu lesen. Dabei macht sich die 
geringe Arbeitsgeschwindigkeit des Recorders störend bemerkbar. Wer die Möglichkeit hat, 
sollte deshalb seine Datenbestände auf Disketten führen und diesen Abschnitt übergehen. 
Wollen Sie von einem Programm zu einem Datenbestand auf einer Kassette zugreifen (lesen 
oder schreiben), müssen Sie zuerst einen Übertragungskanal zwischen Rechner und Recor- 
der einrichten. 


Ein Übertragungskanal zum Recorder wird festgelegt mit 

OPEN k, 1, s ”"Name“ 

Die Kanalnummer k muß zwischen 1 und 255 liegen. 

Für die Sekundäradresse s sind zulässig 

Q Eingabedatei 

1 Ausgabedatei 

2 Ausgabedatei, nach Abschluß der Datei wird eine Bandendemarke (EOT) gesetzt. 
Der Name wird auf 16 Zeichen beschränkt. 


Beispiel: 
25 OPEN 5, 1, 2, "TESTDATEN“ © 


Die OPEN-Anweisung muß ausgeführt werden, bevor in einer PRINT- bzw. INPUT-Anwei- 
sung auf den Kanal Bezug genommen wird. Je nach Übertragungsrichtung werden Sie auf- 
gefordert, die Tasten REC und PLAY (Ausgabekanal) oder nur PLAY (Eingabekanal) zu . 
drücken. Im Falle der Ausgabe wird danach sofort, ähnlich wie beim SAVE, eine Dateian- 
fangs-Information auf die Kassette geschrieben, so daß Sie diese unbedingt vorher richtig 
positionieren müssen. Beim Lesen wird analog zum LOAD verfahren und die Kassette vor- 
wärts abgesucht, bis die Datei mit dem im OPEN genannten Namen gefunden wird. 

Im Gegensatz zur Ausgabe auf den Bildschirm ist die Fragezeichen-Konvention hier nicht 
anwendbar. 


Die Ausgabeanweisung für den Recorder lautet 
PRINT #k, Liste 


48 8 Benutzung des Recorders 


Beispiel: 

SO PRINT #5, A, B$ | © 
Die im PRINT angezogene Kanalnummer k muß natürlich auf einen Ausgabekanal verwei- 
sen (im OPEN s = 1 oder s = 2). Für die Liste gelten die gleichen Regeln wie in der gewöhn- 
lichen PRINT-Anweisung. 


Am Ende eines Programmes mit Ausgabe auf den Recorder sollten Sie den Ausgabekanal 
ordnungsgemäß schließen. 


Ein Kanal wird geschlossen mit 

CLOSE k 

Mit einem solchen CLOSE kann auch ein Eingabekanal geschlossen werden, wenn er nicht 
mehr benötigt wird. 

Sehen wir uns nun an, wie von einer Kassette gelesen wird. 





INPUT #k, Variablenliste. 


Dabei ist mit k.die Nummer eines Eingabekanals (im Open s = ®) gemeint. Die Variablen- 
liste wird nach den gleichen Regeln aufgebaut wie bei der gewöhnlichen INPUT-Anweisung 
und muß vor allem genau wie dort auf die Struktur der Datensätze abgestimmt sein. 


Wenn Sie vom Bildschirm eine Zeile mit mehreren Daten lesen wollen, müssen Sie die Da- 
ten durch Kommas trennen und eine INPUT-Anweisung mit entsprechend vielen Variablen 
ausführen (s. Kapitel 6). Auch mehrere Daten in einem Recorder-Datensatz müssen durch 
Kommas getrennt sein, wenn sie beim Lesen als getrennte Informationen erkannt werden 
sollen. Also müssen diese Kommas beim voraufgegangenen Schreiben der Datensätze mit 
ausgegeben werden, z.B. als String ” , ‘““. 


| Die Eingabeanweisung für den Recorder lautet 


Außerdem müssen Sie in die Datei Satztrennzeichen einsetzen, die ein späteres satzweises 
Lesen ermöglichen. 


Die Ausgabe von CHR$ (13) liefert ein Satztrennzeichen, das später einen Lese- 
befehl beendet. 


8.4 Aufgaben 


8-1 Im Recorder möge sich eine Kassette mit einem Programm befinden. Was müssen Sie 
tun, um den Namen des Programms zu erfahren? 


8-2 Auf einer Kassette sollen schon die Programme AKT, ART und AST stehen. Sie wol- 
len ein viertes Programm dahinter speichern. Welche Namen sind dafür ungeeignet? 
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9 Benutzung der floppy-disk 


In diesem Abschnitt wollen wir den Umgang mit der floppy-disk kennenlernen. Wir unter- 
stellen, daß das Verbindungskabel zwischen Rechner und floppy-disk installiert ist und 
beide Geräte eingeschaltet sind. 

Bei den Übungen können Fehlerbedingungen eintreten, die die floppy-disk oder den Rech- 
ner blockieren. Halten Sie sich deshalb möglichst exakt an die vorgeschriebenen Anweisun- 
gen und beobachten Sie die Fehleranzeige der floppy-disk. Wenn diese blinkt, müssen Sie 
die floppy-disk aus- und wieder einschalten und alle Experimente dieses Abschnittes wie- 
derholen. Wenn gleichzeitig der Cursor fehlt, betätigen Sie die STOP-Taste des Rechners. 
Falls das nicht hilft, müssen Sie auch den Rechner aus- und wieder einschalten. 

Für die Experimente benötigen Sie eine unbespielte Diskette. Sie können auch eine ge- 
brauchte Diskette benutzen, müssen aber bedenken, daß alle darauf gespeicherten Informa- 
tionen zerstört werden. Legen Sie die Diskette in das Laufwerk, schließen Sie die Klappe 
und geben Sie die Anweisungen für die Aufbereitung der Diskette. Dabei werden gespeicherte 
Informationen gelöscht. 


a) Schreiben Sie 


OPEN 1, 8, 15 
PRINT #1, "N: TEST,D1“ 


Wenn die rote Kontrolleuchte erloschen ist, schreiben Sie 
PRINT #1, 1“ 
und danach 


19?”’FLOPPY-TEST“ 
SAVE”PR1“, 8 
VERIFY’’*“, 8 


Wenn der Rechner darauf mit 
VERIFY ERROR 


antwortet, müssen Sie die Übung wiederholen. 
b) Nachdem das Laufwerk wieder steht, schreiben Sie 


LOAD”’$“, 8 

LIST 
Kann Ihr Programm noch irgendwo im Programmspeicher stehen? Falls Sie unsicher 
sind, sehen Sie sich die Bedeutung des LIST-Kommandos noch einmal an. 
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c) Schreiben Sie jetzt 


LOAD’’PR1‘, 8 
RUN 


d) Setzen Sie fort mit 


SAVE”P“, 8 
VERIFY’’*", 8 


Wenn der Rechner darauf mit 
VERIFY ERROR 


antwortet, müssen Sie die Übungen zu Kapitel 9 von Anfang an wiederholen. 
Andernfalls schreiben Sie 


OPEN 1, 8,15 
PRINT #1,”C: R=PR1“ 


e) Jetzt wollen wir feststellen, was diese Kommandos bewirkt haben. Lassen Sie sich das 
Inhaltsverzeichnis der Diskette zeigen. 
Falls Sie nicht von selbst darauf gekommen sind: Sie müssen die Zeilen aus Übung b) 
schreiben. 


f) Jetzt sollen die gespeicherten Programme der Reihe nach gezeigt werden: 


LOAD”PR1‘, 8 
LIST 
LOAD’P“, 8 
LIST 
LOAD”R', 8 
LIST 


Sie sehen, daß die Programme übereinstimmen. 


g) Schreiben Sie jetzt 


OPEN 1, 8,15 

PRINT #1, "R: Z= PR1“ 
PRINT #1,”S: P“ 
LOAD“, 8 

LIST 


9.1 Allgemeine Hinweise 


Auf den Disketten können, wie schon auf den Kassetten, Programme und Daten gespeichert 
werden. Die beiden Speichermedien unterscheiden sich aber in ihrer Organisationsform. Auf 
Disketten wird ein Inhaltsverzeichnis mit den Namen der gespeicherten Dateien (Program- 
me oder Datenbestände) geführt, wo auch die jeweilige Lage der Datei vermerkt ist. Deshalb 
muß jede Diskettendatei einen Namen tragen. 
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Ein weiterer Unterschied zur Kassette besteht darin, daß Disketten vom Benutzer einen Na- 
men und eine Identifikation erhalten. Bevor mit einer in ein Laufwerk eingelegten Diskette 
gearbeitet werden kann, muß der floppy-disk das Kommando gegeben werden, die Dis- 
ketten-Identifikation zu lesen und zu speichern. Greift man danach vom Rechner her auf 
die Diskette zu, werden die dort befindliche und die gespeicherte Identifikation automa- 
tisch verglichen. Bei einem Unterschied werden der Zugriff unterbunden und eine Fehler- 
bedingung angezeigt, so daß ein gewisser Schutz gegen das Vertauschen von Disketten be- 
steht. 

Im Gegensatz zu den Kassetten bedürfen neue Disketten einer Aufbereitung (Vorbereitung 
des Inhaltsverzeichnisses, Aufbringung des Namens und der Identifikation), bevor sie be- 
nutzt werden können. Auch hierfür gibt man der floppy-disk ein entsprechendes Komman- 
do. Beachten Sie, daß die floppy-disk nicht prüft, ob die Diskette unbespielt ist. Eventuell 
vorhandene Dateien werden bei dieser Aufbereitung (N-Kommando) zerstört. 

Wollen Sie der floppy-disk eines der erwähnten oder der noch folgenden Kommandos ge- 
ben, muß ein Kommandokanal eröffnet sein. 


Der Kommandokanal für die floppy-disk wird festgelegt durch die Anweisung 
OPENk, 8, 15 


Die Kanalnummer k muß zwischen 1 und 255 liegen. 
Beispiel: 
OPEN 1, 8, 15 o 


Die 8 ist die standardmäßig festgelegte Gerätekennzahl für die floppy-disk, während die 15 
den Kanal als Kommandokanal charakterisiert. Wenn Sie dieses OPEN geben und für die 
gewählte Nummer schon ein Kanal eröffnet ist, antwortet der Rechner mit 


FILE-OPEN-ERROR 
Nachdem der Kommandokanal eröffnet ist, geben Sie die gewünschten Kommandos mit 
PRINT-Anweisungen, in denen Sie auf die Kanalnummer k verweisen. 


Das Kommando für die grundlegende Aufbereitung einer Diskette lautet 
PRINT #k, ““N:Name, i“ 

Als Disketten-Name sind max. 16 Zeichen zugelassen außer * ?=;;, 

Die Disketten-Identifikation i besteht aus 2 Zeichen. 


Beispiel: 
PRINT #1, ““N:BIBLI,PB“ 


Wir weisen noch einmal darauf hin, daß durch dieses N-Kommando alle auf der fraglichen 
Diskette befindlichen Dateien zerstört werden. Überlegen Sie daher jedesmal, ob Sie wirk- 
lich das N-Kommando geben müssen, oder ob das I-Kommando angebracht ist, mit dem die 
vorhandene Disketten-Identifikation in die floppy-disk übernommen wird. 


Das I-Kommando hat die Form 
PRINT #k, "1" 
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Beispiel: 
PRINT #1, "1" ° 


9.2 Programmarchivierung 


Beim Speichern von Programmen auf einer Kassette mußten Sie dagegen vorsorgen, verse- 
hentlich ein anderes Programm zu überspeichern und damit zu zerstören. Daher mußten Sie 
in der Regel genau wissen, wie weit die Kassette belegt war, und sie vor dem Speichern des 
neuen Programmes bis dahin vorlaufen lassen. Dergleichen ist hier nicht nötig, 


Das Kommando zur Speicherung eines Programms auf einer Diskette lautet 
SAVE ’’Name‘‘, 8 

gefolgt von 

VERIFY’’x, 8 

Das Kommando zum Laden eines Programmes von einer Diskette lautet 
LOAD ’’Name‘‘, 8 

Als Programmname sind 16 Zeichen zugelassen außer * ?=;, 


Das Speichern bzw. Laden gelingt, oder Sie werden durch die Fehleranzeige an der floppy- 
disk auf eine Fehlerbedingung hingewiesen. Wie in Abschnitt 9.5 erläutert, können Sie den 
Fehler erkennen und beheben und dann erfolgreich speichern bzw. laden. 

Mit dem VERIFY-Kommando wird überprüft, ob das gerade auf die Diskette gebrachte 
Programm exakt mit dem im Speicher stehenden übereinstimmt. Die Erfahrung lehrt, daß 
auf diese Kontrolle nach keinem SAVE verzichtet werden darf. Falls Fehler auftreten, 
sollten die auf der Diskette stehende Version gelöscht und das SAVE und VERIFY wieder- 
holt werden. 

Einen Überblick über den momentanen Füllstand einer Diskette können Sie sich durch die 
Auflistung des Inhaltsverzeichnisses verschaffen. Dieses enthält neben den Dateinamen 
auch einen Hinweis, ob es sich um ein Programm (PRG) oder einen sequentiellen Datenbe- 
stand (SEQ) handelt. 


Das Inhaltsverzeichnis der im Laufwerk befindlichen Diskette wird mit 


LOAD "S,8 
in den Rechner übernommen und nach der READY-Meldung angezeigt mit 
LIST 


Die Entwicklung eines Programmes vollzieht sich normalerweise in mehreren Schritten. 
Vergleichbar einer Ahnenkette entstehen im Laufe der Zeit verschiedene Programme, von 
denen die neueren i. a. besser sind. Sie haben von vornherein einen größeren Leistungsum- 
fang, oder sie enthalten weniger Fehler. Wenn Sie eine überarbeitete Programmversion 
unter dem gleichen Namen wieder auf die Diskette auslagern wollen, gelingt das nicht mit 
der obigen Fassung des SAVE-Kommandos. Vielmehr müssen unmittelbar vor den Namen 
die beiden Zeichen @: gesetzt werden. 
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Beispiel: 


SAVE ”@:PR1‘',8 

gefolgt von 

VERIFY’x*",8 
In dieser Form sollten Sie jedoch nur bei kleinen, weniger wichtigen Programmen vor- 
gehen. In allen anderen Fällen ist dringend anzuraten, niemals nur die neueste Version zu 
speichern, sondern mindestens auch den unmittelbaren Vorgänger. Bei besonders bedeut- 
samen Programmen hebt man auch weitere Glieder der Ahnenkette auf. 
Hier empfiehlt es. sich, die Namensvergabe zu systematisieren, damit man allein anhand der 
Namen jüngere und ältere Programme unterscheiden kann. Das können Sie durch einen Ge- 
nerationenzähler erreichen, den Sie neben einem aufgabenbezogenen Teil im Namen mit- 
führen, wie z. B. in der Kette TESTPRG 1, TESTPRG 2, TESTPRG 3 usw. Stattdessen 
können Sie auch die Namen beibehalten und den Inhalt der Dateien aktualisieren. Falls 
Sie jeweils einen Vorgänger aufheben, sind dann statt des einfachen Speicherns sinngemäß 
folgende Anordnungen zu geben: 

Lösche TESTPRGALT. 

Benenne TESTPRG um in TESTPRGALT. 

Speichere aktuelles Programm als TESTPRG. | 
Das Löschen und Umbenennen von Dateien wie auch das außerdem mögliche Kopieren er- 
reichen Sie mit folgenden Kommandos, die Sie der floppy-disk über einen zuvor eröffneten 
Kommandokanal erteilen. 


| Eine Datei wird gelöscht mit 
PRINT #k, ”’S:Name““ 


Beispiel: 
PRINT #1, ”S:TESTPRGALT“ © 


| Eine Datei wird umbenannt mit 
PRINT #k, "R:Name neu = Name alt‘“ 


Beispiel: 
PRINT #1, "R:TESTPRGALT = TESTPRG“ © 


Danach würde der Name TESTPRG nicht mehr im Inhaltsverzeichnis geführt und dürfte im 
SAVE-Kommando erneut verwendet werden. 


Eine Datei wird kopiert mit 
PRINT #k, ”’C:Name neu = Name alt“ 


Beispiel: 
PRINT #1, "C:PRG = TESTPRG“ © 


Bei diesen Kommandos bedeutet k wieder den Kommandokanal. 
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9.3 Programmüberlagerung 


In der Basisversion Ihres Rechners ist der für Programm und Daten verfügbare Speicherplatz 
relativ knapp bemessen. Dieser Platz kann durch eine (zu kaufende) Speichererweiterung 
beträchtlich ausgedehnt werden, aber selbst dann kann der Bedarf Ihrer Programme das 
Platzangebot übersteigen. Der Ausweg aus diesem Dilemma liegt in einer Gliederung des ge- 
samten Programms in solche Teile, die einzeln zusammen mit allen Daten in den Speicher 
passen. Die Teilprogramme werden auf einer Diskette gespeichert und nach Bedarf von dem 
jeweils im Arbeitsspeicher befindlichen Teilprogramm durch ein programmiertes LOAD- 
Kommando nachgeladen. Ein auf diese Weise geladenes Programm wird unter Beibehaltung 
aller Daten automatisch gestartet. 

Wer diese Technik nutzen will, sollte wissen, daß der BASIC-Interpreter den Datenbereich 
normalerweise unmittelbar hinter dem Programm beginnen läßt. Der aktuelle Anfang wird 
intern vermerkt. Wenn diese Adresse so hoch steht, daß davor jedes Teilprogramm unter- 
gebracht werden kann, dürfen die Teile in beliebiger Folge geladen werden. 

Um dieses sicherzustellen, werden die Teilprogramme einzeln geladen und die betreffende 
Adresse mit 


PRINT PEEK (45); PEEK (46) 


abgefragt (s. Abschnitt 12.4). In einem zusätzlichen Vorlaufprogramm schreibt man die 
maximale Adresse auf drei Adreßzeiger des Interpreters und lädt dann von hier das erste 
„echte‘‘ Teilprogramm. Das Vorprogramm lautet 


10 POKE 45,k 
20 POKE 47,k 
30 POKE 49;k 
40 POKE 46,h 
50/POKE 48,h 
60 POKE 5ß,h 
78 LOAD’”’ANF. PROG“, 8 


Hier repräsentieren k und h zwei Konstanten, aus denen sich die Dezimaldarstellung der 
Adresse durch 


k + 256x*h 


berechnen läßt. 


9.4 Sequentielle Dateien 


Hier erörtern wir den Umgang mit Datenbeständen, deren Datensätze nur der Reihe nach 
verarbeitet werden. Zur Erstellung einer solchen Datei benutzt man PRINT-Anweisungen, 
die sich von der gewöhnlichen durch den Verweis auf einen Ausgabekanal unterscheiden. 


Ein Ausgabekanal für die floppy-disk wird eröffnet mit 
OPEN k, 8, s, ”Name, SEQ, WRITE“ 


Die Kanalnummer muß zwischen 1 und 255 liegen. 
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Als Sekundäradresse s ist eine Zahl zwischen 2 und 14 erlaubt. 
Vor den Namen darf ein @: gesetzt werden. 
Der Name der Datei darf bis zu 16 Zeichen enthalten außer * ?=;, 


Beispiel: 
10 OPEN, 4, 8, 4, "@:TESTDATEN, SEQ, WRITE“ © 


Wenn im OPEN für einen Ausgabekanal kein @ vor den Namen gesetzt ist, darf auf der an- 
gesprochenen Diskette noch keine Datei mit dem benutzten Namen stehen. Wird hingegen 
das @ eingefügt, wird eine eventuell vorhandene Datei gleichen Namens vom laufenden 
Programm überschrieben. Wenn das gewünscht ist, können Sie also auf ein vorhergehendes 
Löschen (s. Abschnitte 9.2) der alten Datei verzichten. 


Die floppy-disk ist auch in der Lage, hinter dem letzten Satz einer existierenden Datei 
weitere Sätze zu ergänzen. Dazu muß die Datei im APPEND- statt im WRITE-Modus er- 
öffnet werden. 


Soll eine Datei fortgeschrieben werden, muß sie mit einem OPEN der folgenden 
Form eröffnet werden. 
OPEN k, 8, s, "Name, SEQ, APPEND' 


Die Sekundäradresse s wird für die interne Abwicklung in der floppy-disk benötigt. Wenn 
Sie mehrere Kanäle für verschiedene Dateien gleichzeitig offen halten wollen, müssen nicht 
nur die Kanalnummern, sondern auch die Sekundäradressen eindeutig sein. Da die floppy- 
disk ohnehin nur maximal 6 Kanäle (einschließlich des Kommandokanals) gleichzeitig be- 
dienen kann, wird geraten, bei den Datenkanälen wie im obigen Beispiel zu verfahren, und 
für k und s den gleichen Wert zu wählen. 


Für die Ausgabe von Datensätzen auf eine Diskette wird eine Variante der PRINT-Anwei- 
sung benutzt, wobei die Fragezeichen-Konvention nicht gestattet ist. 

Die Ausgabeanweisung für die floppy-disk lautet 

PRINT #k, Liste 

worin k die Nummer eines zuvor eröffneten floppy-Ausgabekanals ist. 





Die Liste wird nach den gleichen Regeln aufgebaut wie bei der gewöhnlichen PRINT-An- 
weisung. Auch die Wirkung der Listentrennzeichen Komma und Semikolon ist unverändert. 
Sollen Teile eines Datensatzes später als getrennte Daten gelesen werden, müssen im Daten- 
satz an den entsprechenden Stellen Kommas gespeichert sein. Sie sollten daher geeignete 
Strings (”’ , ‘“) in die PRINT-Liste einfügen. Außerdem müssen Sie dafür sorgen, daß in die 
Datei Satztrennzeichen gesetzt werden, die ein späteres, satzweises Lesen ermöglichen. 


Die Ausgabe von CHR$ (13) auf eine Disketten-Datei liefert ein Satztrennzeichen, 
das später einen Lesebefehl beendet. 

Beispiel: 
33 PRINT #4,X;” ,“;Y;CHR$(13);Z;CHRS(13); ® 
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Um die mit dieser Anweisung ausgegebenen Zahlen zu gegebener Zeit wieder lesen zu kön- 
nen, muß zuerst ein Lesebefehl mit 2 Variablen ausgeführt werden, der die alten Werte von 
X und Y holt, und danach einer mit einer Variablen, der den alten Wert von Z liest. 


Die Ausgabe von Daten auf eine Diskette ist nur sinnvoll, wenn man diese Daten auch wie- 
der lesen kann. Dafür ist aber unverzichtbare Voraussetzung, daß das Programm, das die 
Ausgabedatei erstellt, diese auch ordnungsgemäß abschließt. Erst zu diesem Zeitpunkt er- 
folgen die Eintragungen in das Inhaltsverzeichnis der Diskette, die für das spätere, erfolg- 
reiche Lesen der Daten notwendig sind. 


Eine Disketten-Ausgabedatei muß abgeschlossen werden mit 
CLOSE k 
Beispiel: 
95 CLOSE 4 ® 


Nachdem eine sequentielle Disketten-Datei geschlossen ist, kann sie vom gleichen oder ei- 
nem anderen Programm gelesen werden. Voraussetzung ist, daß zunächst ein Eingabekanal 
eröffnet wird. 


Ein Eingabekanal für die floppy-disk wird eröffnet mit 
OPEN k, 8, s, "Name, SEQ, READ““ 
Für k und s gelten die beim Ausgabe-OPEN aufgeführten Regeln. 


Beispiel: 
100 OPEN 5, 8, 5, "TESTDATEN, SEQ, READ“ ® 
Das Lesen von Disketten-Datensätzen erfolgt mit einer modifizierten INPUT-Anweisung. 


Die Eingabeanweisung für die floppy-disk lautet 
INPUT #k, Variablenliste 


Darin ist k die Nummer eines zuvor eröffneten floppy-Eingabekanals. 
Beispiel: 

11® INPUT # 5,A,B ® 
Dateien werden über ihren Namen identifiziert. Vorausgesetzt, die Diskette wurde inzwi- 
schen nicht gewechselt, würde mit diesem Lesebefehl der erste Satz der in den obigen Bei- 


spielen angelegten Datei gelesen, d.h. der seinerzeitige Wert von X stünde jetzt bei A und 
der von Y bei B. 


Auch ein Eingabekanal darf mit CLOSE k geschlossen werden, wenn er nicht mehr benötigt 
wird. Erforderlich ist das jedoch nicht, es sei denn, die Zahl offener Kanäle wird zu groß. 


9.5 Fehlerbehandlung 


Bei den Übungen zu diesem Kapitel haben wir auf die Radikalkur zur Überwindung von 
Fehlerbedingungen in der floppy-disk hingewiesen: das Aus- und Einschalten der gesamten 
Anlage. Dieses Vorgehen hat jedoch Konsequenzen, die oft nicht akzeptabel sind: Das aktu- 
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elle Programm wird zerstört, die Fehlerursache kann nicht erkannt werden, und Datenbe- 
stände können verlorengehen. 


Ein besserer Weg ist, vom cbm-Rechner her die Fehlerbedingung abzufragen. Nach dieser 
Abfrage wird die Fehleranzeige der floppy-disk gelöscht und Sie erhalten Gelegenheit, Ihr 
Programm ordnungsgemäß abzuschließen (CLOSE für Ausgabedateien geben!) oder gar den 
Lauf fortzusetzen. Voraussetzung ist, daß Ihr Programm eine entsprechende Routine ent- 
hält, damit Sie die Fehlerabfrage ohne Programmänderung bewerkstelligen können. 


In Abschnitt 9.1 haben wir gesehen, wie mit Hilfe eines Kommandokanals und darauf ab- 
gestimmten PRINT #-Anweisungen an die floppy-disk Kommandos übergeben werden. Über 
den gleichen Weg, aber in umgekehrter Richtung, d.h. mit INPUT # statt PRINT#, kann die 
Fehlerinformation von der floppy-disk in den Rechner geholt werden. Sie sollten daher fol- 
gendes Programmstück aufnehmen, wobei Sie natürlich andere Zeilennummern, eine andere 
Kanalnummer oder andere Variablen benutzen dürften: 


6001 OPEN 1,8,15 

60002 INPUT #1,Q8,W9,E9,R4 
60003 PRINT "FEHLERMELDUNG“ 
60004 PRINT Q9,W9,ES,R9 

6005 CLOSE 1 

6hHd6 STOP 


Wenn jetzt die Fehleranzeige der floppy-disk aufleuchtet, können Sie die Kontrolle überneh- 
men (STOP-Taste) und nach der READY-Meldung das Kommando 


GOTO 69091 


geben. Die aufgeführten Befehle bringen die 4teilige Fehlermeldung, gefolgt von BREAK 

IN 60006, auf den Bildschirm. Anhand dieser Meldung können Sie jetzt über den Abbruch 
des Programms oder die Fortsetzung an geeigneter Stelle entscheiden. Falls Ausgabedateien 
eröffnet sind, sollten Sie mindestens die zugehörigen CLOSE-Anweisungen ausführen lassen. 


9.6 Aufgaben 


9-1 Vor dem Arbeiten mit Disketten wird häufig ein Kommandokanal eröffnet, z.B. 
OPEN 1, 8, 15. Was bedeuten die 3 Zahlen? 

9-2 Wozu dient der Diskettenname? 

9-3 Wie können Sie sich das Inhaltsverzeichnis einer Diskette anzeigen lassen? Wie sieht 
der Inhalt des Programmspeichers unmittelbar danach aus? Was müssen Sie beachten, 
wenn Sie jetzt ein neues Programm entwickeln wollen? 

9-4 Was bewirkt das Kommando 


PRINT #1, ’’N:3, 4° 
9-5 Schreiben Sie ein Programm, das die ersten 3 Sätze einer floppy-Datei liest. Der erste 
Satz soll eine, der zweite zwei und der dritte Satz drei Zahlen enthalten. Erstellen Sie 
für den Programmtest folgende Datei: 1 im 1. Satz. 2 und 3 im 2. Satz. 4,5 und 6 im 
3. Satz. 
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10 Benutzung des Druckers 


Mancher Benutzer wird es begrüßen, wenn seine Programme nicht nur auf einer Diskette 
oder Kassette gespeichert sind, sondern er auch eine Auflistung des Programms erhält. Je 
nach Aufgabenstellung kann es auch sinnvoll sein, die Ausgabe eines Programms auf Papier 
zu drucken, statt sie nur auf dem Bildschirm zu zeigen. Deshalb wollen wir in diesem Kapi- 
tel die grundlegenden Möglichkeiten des Druckers ansprechen. Wer die weitergehenden 
Darstellungsvarianten nutzen möchte, findet die notwendigen Erläuterungen im Bedienungs- 
handbuch. 
a) Schalten Sie Rechner und Drucker ein (Papier nicht vergessen!) und schreiben Sie 

20 T1$ = "RADIUS =*:T2$ = ’CM“ 

30 T3$ = "=> A =":T4$ = "QCM“ 

40 INPUT "RADIUS“;R 

50 PRINT T1$;R;T2$, T3$;7+Rx+R;T4$ 

60 ?:? "NOCHMAL (= J), ENDE (= E)?“ 

78 GET W$:IF W$ = ""THEN 70 

80 IF WE =") THEN 40 

90 IFWS<>"E“ THEN 70 

RUN 


Lassen Sie das Programm zwei- bis fünfmal durchlaufen. 
Ergänzen Sie 

#5 
in Zeile 5Ö unmittelbar hinter PRINT und schreiben Sie 


16 OPEN 5, 4, ® 
100 CLOSE 5 


Lassen Sie das Programm mit den obigen Daten erneut laufen und vergleichen Sie die 
Ausgabezeilen. 
b) Ergänzen Sie in Zeile 50 
‚CHR$(13) 
und lassen Sie auch diese Programmvariante einige Male laufen. 
c) Schreiben Sie jetzt 


OPEN 7, 4:CMD 7 
LIST 


und nachdem das Drucken beendet ist 
PRINT # 7:CLOSE 7 
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10.1 Auflistung von Programmen 


Im Abschnitt 4.3 haben wir die Varianten des LIST-Kommandos erörtert, mit denen Teile 
eines Programms oder ein ganzes Programm auf dem Bildschirm angezeigt werden können. 
Wie Sie in Übung c) gesehen haben, können LIST-Kommandos so umdirigiert werden, daß 
die Programmzeilen auf dem Drucker angezeigt werden. 

Die Ausgabe eines LIST-Kommandos wird auf den Drucker gelegt durch 

OPEN k, 4:CMDk 

Darin ist für k eine Zahl zwischen 1 und 255 einzusetzen. 

Die Wirkung dieses Kommandopaares wird aufgehoben durch 

PRINT #k:CLOSE k 
Das OPEN-Kommando kennen Sie bereits aus den beiden vorangegangenen Kapiteln. Es 
wird immer dann gegeben, wenn ein Übertragungskanal zwischen dem Rechner und einem 
Peripheriegerät eröffnet werden soll. Welches Gerät gemeint ist, wird durch den zweiten 
Parameter gesagt, hier die 4, die Gerätenummer des Druckers. Durch den Verweis auf den 
Drucker-Kanal im CMD-Kommando erfolgt das Umlegen der LIST-Ausgabe. Mit den nach- 
folgenden LIST-Kommandos werden die Programmzeilen solange gedruckt, bis die Wirkung 
von CMDk durch PRINT #k neutralisiert und der Kanal durch CLOSE k geschlossen wird. 


10.2 Ausgabe auf den Drucker 


Wie bei den anderen Peripheriegeräten muß auch hier ein Ausgabekanal eröffnet sein, ehe 
die entsprechenden PRINT #-Anweisungen ausgeführt werden dürfen. 


Ein Ausgabekanal vom Rechner zum Drucker wird festgelegt mit 
OPENk, 4, s 
Die Kanalnummer k muß zwischen 1 und 255 liegen. 


Für die Sekundäradresse s sind zulässig: 
Ö CURSOR UP Modus (normaler Ausdruck) 
7 CURSOR DOWN Modus (Kleinschreibung) 


Beispiel: 
20 OPEN 5, 4, 7 bu 
Die Ausgabeanweisung für den Drucker lautet 


PRINT#k, Liste 
worin k die Nummer eines zuvor eröffneten Drucker-Ausgabekanals ist. 


Beispiel: 
40 PRINT #5, X, ”DM“ o 
Die Liste wird nach den gleichen Regeln aufgebaut wie bei der gewöhnlichen PRINT-An- 


weisung. Wie die Übung a) gezeigt hat, sind auch die Ausgabezeilen für Bildschirm und Druk- 
ker völlig gleich, wenn ein Ausgabekanal mit Sekundäradresse ® benutzt wird. (Bei fehlender 
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Sekundäradresse wird hier ® angenommen.) Für diese Ausgabeform gilt grundsätzlich alles, 
was in Kapitel 5 über die Ausgabe gesagt wurde. 

Wer aufwendige Druckerausgaben programmiert und im gleichen Programm noch andere 
Peripheriegeräte anspricht, läuft Gefahr, die Maximalzahl von 1® gleichzeitig geöffneten 
Kanälen zu überschreiten. Außerdem empfiehlt sich in jedem Fall das Schließen des Druk- 
ker-Ausgabekanals, weil sonst am Programmende unter Umständen der letzte Teil der Aus- 
gabe im Rechner hängenbleibt. Das liegt daran, daß die Ausgabe normalerweise mit Hilfe 
eines Pufferspeichers abgewickelt wird. Dieser wird nicht nach jeder PRINT-Anweisung zum 
Drucker übertragen, wohl aber beim Schließen des Ausgabekanals. 


Der Übertragungskanal k wird geschlossen mit 
CLOSE k 


10.3 Aufgaben 


10-1 Wenn Sie in ein Programm mit Bildschirmausgabe an den Anfang ein OPEN k, 4 für 
unformatierte Druckerausgabe und hinter jedes PRINT den Verweis auf den Ausga- 
bekanal (#k,) setzen, erscheint die Ausgabe unverändert auf dem Drucker. Entspre- 
chendes gilt für den Übergang von unformatierter Drucker- auf die Bildschirmaus- 
gabe. 

Ist diese Aussage wirklich uneingeschränkt richtig, oder sind gewisse Teile der Ausga- 
be nicht übertragbar? 

10-2 Schreiben Sie ein Programm, das in 2 nebeneinanderliegenden Kolonnen Zahlen X 
und deren Quadrat ausgibt. 

Zwischen den Kolonnen sollen mindestens 3 Stellen frei bleiben. Die Kolonnen 
sollen X bzw. Xt2 als Überschrift erhalten. Lassen Sie das Programm mit ca. 10 teils 
positiven und teils negativen X-Werten laufen. 


10-3 Lassen Sie das Programm zu Aufgabe 10-2 (oder ein anderes) ausdrucken. 
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11 Schleifen 


Programmteile, die mehrfach durchlaufen werden, lassen sich mit einer bedingten Sprungan- 
weisung programmieren. In vielen Fällen kann stattdessen die spezielle Schleifenanweisung 
benutzt werden, die wir uns jetzt ansehen wollen. 


a) Schreiben Sie folgendes Programm und notieren Sie die Ergebnisse des Programmlaufs. 


10 K=25 

20 ?K 

50 K=K+1.5:1F K<= 17.5 THEN 20 
60 ?"ENDE“ 


b) Ändern Sie die folgenden Zeilen. 


18 FORK = 2.5 TO 7.5STEP 1.5 
50 NEXT 


Lassen Sie das geänderte Programm laufen, und vergleichen Sie die Ergebnisse mit denen 
aus Übung a). 


c) Löschen Sie in Zeile 19 die Zeichen 
STEP 1.5 


Sehen Sie sich an, welchen Einfluß das auf die Leistung des Programms hat. 


11.1 Schleifen im Ablaufplan 


Bei der Einführung des GOTO-Kommandos haben wir erwähnt, daß es bei einigen Klassen 
von Programmen sinnvoll ist, vom Ende des Programms wieder an seinen Anfang zu sprin- 
gen. Derartige Schleifen werden hier nicht erörtert. Jetzt geht es darum, einen echten Teil 
eines Programms mehrfach in Serie zu durchlaufen, d.h. dieses Stück als Schleife zu formu- 
lieren, und dann in einen anderen Programmteil einzusteigen. 


Bild 11.1 zeigt die Darstellung von Schleifen in Ablaufplänen. Der Planausschnitt a stammt 
aus dem Beispiel des Abschnitts 7.3, den Ausschnitt b finden Sie in Übung a) wieder. Bei- 
den gemeinsam ist, daß die Schleifensteuerung über eine Variable (S bzw. K) erfolgt, deren 
Wert in der Schleife systematisch verändert wird. Vor der Schleife erhält diese Variable ei- 
nen Startwert. Am Ende der Schleife wird durch einen Vergleich mit einem Schwellenwert 
entschieden, ob ein weiterer Durchlauf erfolgen soll. 

Der wesentliche Unterschied liegt in der Art, wie die zur Steuerung benutzte Variable ver- 
ändert wird. Im Fall a werden unterschiedliche, im Fall b gleiche Summanden addiert. Nur 
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K=2.5,7.5,1.5 






Bild 11.1 Schleifensymbol | 


für Schleifen der zweiten Art läßt sich die BASIC-Schleifenanweisung verwenden. Da in ei- 
nem detaillierten Ablaufplan genau festgelegt wird, welche ausführbaren Anweisungen pro- 
grammiert werden sollen, ist ein Schleifensymbol erforderlich. Wir umschließen die Schleife 
mit einem stärker gezeichneten Rechteck, in dessen oberen Rand ein flach gestrecktes Sechs- 
eck für die Aufnahme der Laufliste gesetzt wird. Dieses recht anschauliche Schleifensymbol 
wird von zahlreichen EDV-Anwendern benutzt. Es ist mit der DIN 66091, die kein Schlei- 
fensymbol kennt, verträglich, während die anderen, in diesem Buch verwendeten Symbole 
der genannten Norm entstammen. Wie die Schleife aus Fall b mit Hilfe der Schleifensym- 
bolik dargestellt wird, sehen Sie in Bild 11.1, Fall c. 


In dem Rahmen, der die Schleife umschließt, sind alle Ablaufplansymbole erlaubt, also dür- 
fen dort insbesondere auch Schleifen auftreten. Beachten Sie, daß die äußere Schleife die 
innere dabei vollständig umfaßt. Eine nur teilweise Überschneidung von Schleifensymbolen 
ist unzulässig. Welchen Bedingungen die Laufliste genügen muß, finden Sie im nächsten Ab- 
schnitt. 


11.2 Schleifenanweisung 


Im Ablaufplan werden die Symbole durch einen Rahmen eingegrenzt, die den Inhalt einer 
Schleife bilden. Eine entsprechende Begrenzung muß auch im Programm vorgenommen wer- 
den. 


Der Schleifenanfang wird festgelegt mit 
FORk=kaTOkeSTEP ks 


Das Schleifenende wird markiert durch 
NEXT oder NEXT k 


Für k ist eine Variable einzusetzen. 
Für ka, ke und ks sind arithmetische Ausdrücke erlaubt. 


Wenn mit der Schrittweite 1 gearbeitet werden soll, darf die Angabe STEP ks ent- 
fallen. 


Der BASIC-Interpreter versteht das Kennwort FOR als Anfang einer Schleife und erwartet 
dahinter die Laufliste. Außerdem muß zu jeder FOR-Anweisung später eine NEXT-Anwei- 
sung auftreten. Ein dadurch eingegrenzter Schleifenbereich wird zunächst einmal durchlau- 
fen, wobei die Laufvariable k ihren Anfangswert ka trägt. Sodann wird die Laufvariable bei 
positiver (negativer) Schrittweite ks erhöht (verringert): k=k+ ks. Falls der neue Wert der 
Laufvariablen noch nicht größer (kleiner) als der Endwert ke ist, wird die Schleife erneut 
durchlaufen. Dieses Wechselspiel von Änderung der Laufvariablen und erneutem Schleifen- 
durchlauf wiederholt sich solange, bis der Endwert überschritten (unterschritten) würde. 
Einen Punkt wollen wir noch einmal betonen: 


| Eine Schleife wird mindestens einmal durchlaufen. 


Innerhalb einer Schleife dürfen beliebige Anweisungen auftreten, z.B. wiederum Schleifen, 
die dann aber vollständig ineinandergeschachtelt sein müssen. Im Falle von 2 Schleifen sieht 
der BASIC-Interpreter das erste NEXT als Ende der inneren und das zweite als Ende der 
äußeren Schleife an. Damit ist für ihn die Schachtelung korrekt. Falls Sie das Ende in der 
Form NEXT k programmieren, müssen Sie darauf achten, daß zunächst die innere und dann 
die äußere Schleife geschlossen wird. Dieses gilt analog, wenn mehr als 2 Schleifen ineinan- 
der liegen. 


Besondere Sorgfalt ist angebracht, wenn Schleifen und Sprünge zusammentreffen. Verboten 
ist, in eine Schleife hineinzuspringen. Von außen dürfen Sie nur über die FOR-Anweisung 
kommen, die Sie auch anspringen dürfen. Soll ein Schleifendurchlauf abgebrochen bzw. 
zum nächsten Wert der Laufvariablen übergegangen werden, muß das Schleifenende ange- 
sprungen (erreicht) werden. Darüber hinaus darf ein Schleifenbereich über einen Sprung 
verlassen werden. 

Falls der Sprung aus einer inneren in eine äußere Schleife führt, müssen die Schleifenenden 
in der Form NEXT k codiert werden, weil der Interpreter andernfalls die Enden falsch zu- 
ordnet. Nach Möglichkeit sollte man solche Sprünge vermeiden. Ein Beispiel am Schluß des 
nächsten Abschnitts zeigt, wie Sie mitunter auf Sprünge verzichten können. 


11.3 Indizierte Variablen 


Diesen Abschnitt wollen wir mit der Erörterung eines kleinen Beispiels beginnen. 


Problem: Es sollen N Preise P; gelesen und ihre Summe S berechnet werden. Falls S ober- 
halb 1000 liegt, sollen alle Einzelpreise und die Summe, andernfalls soll nur die Summe aus- 
gegeben werden. Externe Speicher dürfen nicht verwendet werden. 

Falls es nur auf die Berechnung und Ausgabe der Summe 5 angekommen wäre, hätte man 
nach dem Ablaufplan a aus Bild 11.2 arbeiten können. In der zentralen Verarbeitungs- 
schleife wird jeweils ein Preis P gelesen und in die Summe S einbezogen. Beim nächsten 
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Durchlauf wird wieder ein Preis gelesen und ebenfalls auf der Variablen P gespeichert. Da- 
bei wird der alte Wert von P zerstört. Das könnte man in Kauf nehmen, vielmehr wäre es 
sogar sinnvoll, wenn es nur auf S ankäme. 

Um unser Problem zu lösen, dürfen wir die Einzelpreise nicht durch ständiges Überspeichern 
vergessen. Wir müssen sie mindestens solange alle separat speichern, bis die Gesamtsumme 
bekannt ist. Folglich müssen wir beim Lesen der Preise lauter verschiedene Speicherplatzbe- 
zeichnungen benutzen. Doch wie sollen wir das formulieren, zumal die Anzahl der Preise 
variabel ist? 

Mit unserem derzeitigen Kenntnisstand ist das Problem nicht zu lösen. Wir brauchen eine 
Speicherzugriffstechnik, bei der die Speicherplatzbezeichnungen vom Programm generiert 
werden und nicht als Variablennamen starr festgeschrieben sind. Diese Anforderungen las- 
sen sich mit indizierten Variablen befriedigen. 


a) 
Eingabe: 
N 





Eingabe: 
N 














S=0 
DIM P(N) 





Eingabe: 
P 


5 







Ausgabe: 
P(L) 
Ausgabe: 
5 


Bild 11.2 
Summe von Eingabewerten 
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Die Bezeichnung einer indizierten Variablen umfaßt einen Namen und eine Indexliste: 
Name (Indexliste) 

Der Name wird nach den Regeln für Variablennamen geschrieben. 

In der Indexliste stehen einer oder mehrere durch Kommas getrennte Indizes. 

Jeder Index darf als arithmetischer Ausdruck geschrieben werden. 

Der Wert eines Index darf nicht negativ sein, der echt gebrochene Anteil wird ignoriert. 


Alle indizierten Variablen mit gleichem Namen bilden einen sog. Array. Wenn in der Index- 
liste jeweils nur ein Index steht, nennt man den Array auch einen Vektor, wenn stets ein In- 
dexpaar auftritt, spricht man von einer Matrix. Das einzelne Element eines Arrays kann eine 
Zahl (einen String) aufnehmen und genauso verwendet werden wie eine gewöhnliche (String-) 
Variable. Der Vorteil der indizierten Variablen liegt in der Möglichkeit, während der Pro- 
grammausführung den Index zu ändern, so daß ein und derselbe Befehl in einem Lauf mit 
verschiedenen Speicherplätzen arbeiten kann. 


Beispiele von indizierten Variablen: 
A(3)IAB(5, K,X + 1)IAB$(A (2), 7)IA % (2, A) | ® 


Bemerkenswert ist, daß die hier aufgeführten Arraynamen im selben Programm auftreten 
dürfen, sie vertragen sich auch mit Variablen gleichen Namens, z.B. A, A % oder AB$, Bei 
gleichen Arraynamen dürfen aber keine Indexlisten verschiedener Struktur benutzt werden, 
so daß z.B. A(3) und A (4, 5) unverträglich sind. 


Lassen Sie uns nun in der Erörterung des am Anfang dieses Abschnittes gestellten Problems 
fortfahren! Als Schwachstelle hatten wir bereits das Lesen der Preise erkannt. Dort werden 
wir jetzt eine einfach indizierte Variable verwenden und dafür sorgen, daß sich bei jedem 
Schleifer. durchlauf ein anderer Index ergibt. Das gelingt besonders einfach, wenn wir als 
Index die Laufvariable nehmen. So erhalten wir schließlich den Plan b aus Bild 11.2. 
Mancher Leser wird bei der Ausgabeschleife in diesem Ablaufplan Bedenken haben, ob die 
Zahlen, die wir auf P(K) gelesen haben, mit P(L) wiedergefunden werden. Machen Sie sich 
bitte klar, was wir über den Index gesagt haben. Er wird als arithmetischer Ausdruck ange- 
sehen, dessen Wert zu ermitteln ist. Der ganzzahlige Teil dieses Wertes dient als tatsächlicher 
Index. Entscheidend ist daher, daß die Indizes in der Lese- und der Ausgabeschleife die 
gleiche Zahlenmenge durchlaufen. Ob wir dabei als Index verschiedene Variablen benutzen 
oder nicht, ist unwichtig. 


Wir müssen noch auf die Speicherung indizierter Variabler eingehen und können an Bemer- 
kungen aus Kapitel 5 anknüpfen. Dort hatten wir schon gesagt, daß die Variablen in einem 
bestimmten Speicherbereich angelegt werden. Wenn der BASIC-Interpreter in einer Anwei- 
sung einen Variablennamen findet, sieht er in einer Tabelle nach, wo der zugehörige Spei- 
cherplatz anfängt. Steht der Name nicht in der Tabelle, wird er ergänzt und ihm eine Platz- 
adresse zugeordnet. Entsprechend verfährt der Interpreter, wenn er auf einen Arraynamen 
stößt. Allerdings bedarf es hier grundsätzlich einer Absprache darüber, wieviel Speicherplatz 
dem Array zugeordnet wird. Sie können auf individuelle Vereinbarungen verzichten, wenn 
Sie die Standarddimensionierung übernehmen wollen. 
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Wenn der BASIC-Interpreter auf eine indizierte Variable aus einem Array trifft, der 
noch nicht angelegt ist, legt er ihn so an, daß er die Anzahl der Dimensionen aus der 
aktuellen Indexliste und für jede Dimension als maximalen Index 19 nimmt. 


Falls Sie den Indexbereich [®, 1®] nie verlassen und damit insbesondere bei mehrfach indi- 
zierten Arrays keine große Platzverschwendung verbunden ist, sollten Sie die Standarddi- 
mensionierung nutzen. Andernfalls müssen Sie vor der ersten Verwendung den Array indi- 
viduell anlegen lassen. 


Arrays werden angelegt mit 

DIM Name (Liste maximaler Index werte) 

In der Liste wird für jede Dimension der maximale Index in Form eines arithmeti- 
schen Ausdrucks festgelegt. Bei 2 oder mehr Dimensionen werden die Angaben durch 
Kommas getrennt. 


Beispiel für Sprünge bei geschachtelten Schleifen. 


Wir wollen ein Programmstück erörtern, mit dem die Verteilung von Zufallszahlen auf vor- 
gegebene Intervalle erfaßt wird. Folgende Werte seien bekannt, Arrays seien ausreichend 
dimensioniert: 


M Anzahl der Zahlen 
N Anzahl der Grenzen 
X(1)<X(2)<...<X(N) Grenzen 


Mit RND (TI) (s. Kapitel 12) können Zufallszahlen erzeugt werden, und für jede soll das In- 
tervall (X, _ ı, X;] ermittelt werden, in dem die Zahl liegt. 

Bild 11.3 zeigt Ihnen einen Lösungsvorschlag. In der inneren Schleife wird das Intervall ge- 
sucht. Ist es gefunden, kann der Eintrag erfolgen und zur nächsten Zufallszahl übergegangen, 
d.h. die äußere Schleife erneut durchlaufen werden. Falls Sie hier die Schleifenenden nur 
als NEXT codieren, läuft das Programm falsch; denn nach dem ersten Sprung von Zeile 130 
nach Zeile 169 werden keine weiteren Zufallszahlen generiert. 

Bild 11.4 zeigt eine Alternativlösung, die ohne Sprünge auskommt. Nachdem das Intervall 
gefunden und der Eintrag erfolgt ist, wird die Laufvariable der inneren Schleife auf ihren 
Endwert gesetzt. Deshalb wird diese Schleife anschließend verlassen und die äußere erneut 
durchlaufen. ® 


11.4 Aufgaben 


11-1 Schreiben Sie ein Programm, das n liest und n! (sprich: n Fakultät) berechnet. Es ist 
n! = 1*2*3 ... *n. 


11-2 Schreiben Sie ein Programm, das m und n liest (n positiv, ganzzahlig) und (?) (sprich: 
m über n) berechnet. 


* —_ * _ 
Es ist (m) „ Elm 1)... (m+ 1 n) 


1*2...*n 


Anm.: (2 ) ist die Anzahl verschiedener Lottoreihen. 
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198 FORK=1TOM 










| 
Z=RND(TI) 


110 Z=RND(TI) 


128 FORL=1TON 


130 IFZ <= X(L) THEN 169 
1408 NEXTL 


150 GOTO 179 


V(L)=V(L)+1 168 V(L)=V(L)+1 


178 NEXTK 


Bild 11.3 Verteilung von Zufallszahlen, 1. Version 


188 FORK=1TOM 


118 Z=RND(TI) 


128 FORL=1TON 


130 IFZ <=X(L) THEN V(L)= V(L)+1:L=N 


V(L)=V(L)+#1 
L=N 


149 NEXT 


158 NEXT 





| Bild 11.4 Verteilung von Zufallszahlen, 2. Version 
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11-3 In Bild 11.1, Teil b und c, sind für positive Schrittweite eine explizite und eine 
FOR ... NEXT-Schleife gegenübergestellt. Geben Sie mit Hilfe der Vorzeichenfunk- 
tion SGN (s. Abschnitt 12.3) eine BASIC-Formulierung der allgemeinen expliziten 
Schleife, die sowohl für positive als auch für negative Schrittweiten genau der FOR ... 
... NEXT-Schleife entspricht. 


11-4 Schreiben Sie ein Programm, das n Punkte der (X, Y)-Ebene liest (Reihenfolge: n, X, , 
Yı,X2, Y253 2... ,Xn Yn), und nach X aufsteigend sortiert. 
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12 Unterprogramme 


Wenn Sie mit der Programmierung einer größeren Aufgabe konfrontiert sind, sollten Sie 
frühzeitig darangehen, die gestellte Aufgabe in Teilaufgaben zu gliedern. Dabei werden Sie 
oft erleben, daß an verschiedenen Stellen des Gesamtablaufs die gleichen Teilprobleme auf- 
treten. Das legt die Frage nahe, ob es möglich ist, ein solches wiederkehrendes Teilproblem 
in dem zu erstellenden Programm nur einmal abzuhandeln und das betreffende Programm- 
stück mehrfach zu nutzen. In diesem Kapitel wollen wir uns ansehen, wie weit dieses Vor- 
gehen von cbm-BASIC unterstützt wird. 


a) Schreiben Sie 
10 INPUT "A, B“;A,B 
20 GOSUB 199 
30 ?”Z39“, A 
40 INPUT ”C, D‘“;C,D 
50 GOSUB 199 
60 ?’Z60, A 
78 GOTO 19 
108 IFB<ATHENA=B 
118 RETURN 


Lassen Sie das Programm 2- bis 3-mal durchlaufen. Beenden Sie die Ausführung, ohne 
das Programm zu zerstören (ggf. in Abschnitt 6.1 nachsehen). 


b) Ergänzen Sie die nachfolgende Zeile 45 und lassen Sie das Programm mit den gleichen 
Zahlen arbeiten wie in Übung a). Notieren Sie dabei die Folge der Eingabe- und Ausga- 
bezeilen. 


45 A=-C:B=D 
c) Löschen Sie den Programmspeicher und schreiben Sie 
18 DEFFNTF (X) = ((X - 3)*X + 3)*X -1 
20 INPUT X 
30 ?FNTF (X) 
49 GOTO 29 


Lassen Sie das Programm einige Male laufen und geben Sie am besten kleine ganze Zah- 
len ein. 


d) Lassen Sie die Zeile 19 unverändert und ersetzen Sie in den Zeilen 20 und 3® das X je- 
weils durch ein A. Starten Sie das Programm, und geben Sie die gleichen Zahlen ein wie 
in Übung c). 
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e) Ergänzen Sie jetzt 
15 X=3 
Lassen Sie das Programm mit einem Eingabewert ungleich 3 laufen und überzeugen Sie 


sich, daß der Inhalt von X nicht verändert wurde. Sehen Sie notfalls in Kapitel 4 nach, 
wie Sie das kontrollieren. 


12.1 Subroutine 


In Übung b) haben Sie ein Programm geschrieben, das an 2 Stellen Zahlenpaare liest und 
jeweils die kleinere der beiden ausgibt. Der Größenvergleich ist aber nur einmal (Zeile 109) 
codiert. Diese Zeile ist also nach jedem Lesen ausgeführt worden, was offenbar durch 
GOSUB 1ß$ erreicht wurde. Hätten wir stattdessen beide Male GOTO 1®® geschrieben, 
wäre ebenfalls nach dem Lesen der Vergleich ausgeführt worden. Wir fragen uns daher, wo 
der Unterschied zwischen GOTO 180 und GOSUB 190 liegt. Diesen Unterschied erkennen 
Sie, wenn Sie in Ihr Protokoll der Übung b) schauen. Dort ist ausgewiesen, daß mit ver- 
schiedenen Anweisungen ausgegeben wurde. Der Rechner hat sich offenbar gemerkt, von 
wo er zur Zeile 1ß® geschickt wurde, und ist jeweils dahin zurückgekehrt. Genau hierin 
liegt der Nutzen des Subroutine-Aufrufs GOSUB. 

Bevor wir eine Subroutine aufrufen, müssen wir jedoch dafür sorgen, daß die Zahlen, die 
wir in der Subroutine verarbeiten wollen, auf den Plätzen stehen, die in der Subroutine be- 
nutzt werden. Deshalb hat in Übung a) die Eingabe von C und D nichts bewirkt. Erst nach 
Ergänzung der Zeile 45 (Übung b) wurde auch für das Paar C, D die kleinere Zahl be- 
stimmt. Beachten Sie aber bitte, daß durch die erneute Belegung der Plätze A und B de- 
ren alter Inhalt verloren geht. Hätten wir diese alten Werte später im Programm noch be- 
nutzen wollen, hätten wir sie rechtzeitig auf andere Plätze umspeichern müssen. 

Um möglichen Irrtümern vorzubeugen, wollen wir betonen, daß GOSUB und RETURN ein 
logisch zusammenhängendes Paar von Anweisungen bilden. RETURN wirkt nur, wenn zu- 
vor ein GOSUB erfolgte. Dabei ist durchaus gestattet, von einer Subroutine eine weitere 
aufzurufen. Der Rechner trägt nämlich bei GOSUB die zugehörige Rückkehradresse in eine 
Tabelle ein. Wenn er auf ein RETURN-Kommando stößt, kehrt er zur jüngsten dieser 
Adressen zurück und streicht sie aus der Liste. Deshalb sollten Sie stets darauf achten, daß 
die Rückkehr aus einer Subroutine wirklich über RETURN erfolgt, damit die erwähnte 
Tabelle korrekt geführt wird. 

Lassen Sie uns diese Ausführungen in Regeln zusammenfassen: 


Eine Subroutine, die bei der Zeile mit der Nummer n beginnt, wird aufgerufen mit 
GOSUB n 

Mit RETURN wird hinter das GOSUB zurückgekehrt, das die betreffende Subroutine 
aufgerufen hat. 

Eine Schachtelung von Subroutine-Aufrufen ist erlaubt bis zu einer maximalen Tiefe 
von 23. 


121 Subrutine 2020000 NM 


Ähnlich wie beim berechneten Sprung können von einer Stelle alternativ verschiedene Un- 
terprogramme aufgerufen werden. 


Diese Anweisung hat die Form 
ON aGOSUB nl,n2,...,nk 


Darin sind a ein nicht negativer arithmetischer Ausdruck und n] bis nk Zeilennum- 
mern, bei denen jeweils eine Subroutine beginnt. 


Wenn der ganzzahlige Teil von a nicht zwischen 1 und k liegt, wird sofort mit der nächsten 
Anweisung fortgesetzt. Andernfalls wird vorher zum entsprechenden Unterprogramm ver- 
zweigt, d.h. z.B. beia= 2 nach n2, und nach RETURN die auf ON ... GOSUB folgende 
Anweisung ausgeführt. 


Beispiel für die Verwendung einer Subroutine: 


In einem (X, Y)-Koordinatensystem (X-Achse waagerecht) seien n Punkte (X, , Yı), -.. 
3 (Xp Yn) gegeben. Diese sollen spaltenweise aufsteigend sortiert werden, wobei der 
ganzzahlige Teil der X-Koordinate die Spalten definieren soll. 


Wir wollen diese Aufgabe so lösen, daß alle Sortierungen von einem Unterprogramm vorge- 

nommen werden. Deshalb speichern wir die Koordinaten in einer (n,3)-Matrix K: 

X in Spalte 1, Y in Spalte 2, [X] in Spalte 3. ([X] bedeutet größte ganze Zahl < X.) 

Auf folgenden Wegen kommt man zum Ziel: 

Weg A: 

1. Alle Punkte nach [X] sortieren. Danach liegen die Punkte einer Spalte, d.h. mit glei- 
chem [X] hintereinander. 


2. Jede dieser Spalten getrennt nach Y sortieren. 

WegB: 

1. Alle Punkte nach Y sortieren. 

2. Alle Punkte nach [X] sortieren unter Beibehaltung der Vorsortierung aus Schritt 1. 


Wir wollen den Weg B realisieren. Bild 12.1 zeigt den entsprechenden Ablaufplan. Die Sor- 
tierung läuft so, daß nach dem ersten Durchlauf der äußeren Schleife die kleinste aller 
Zahlen auf Platz 1 steht, nach dem zweiten Durchlauf die kleinste der restlichen Zahlen 
(das ist die zweitkleinste von allen) auf Platz 2 usw. Bei jedem Durchlauf ist der auf dem 
H1-ten Platz stehende Wert mit allen nachfolgenden zu vergleichen, was in der H2-Schleife 
geschieht. Findet sich auf dem H2-ten Platz ein kleinerer Wert, wird er auf den H1-ten Platz 
gebracht, und die bis dahin auf den Plätzen von einschließlich H1 bis ausschließlich H2 
stehenden Zahlen werden um einen Platz nach hinten verschoben. Diesem Zweck dienen 
die beiden über L und M laufenden Schleifen. 


Das Hauptprogramm, auch MAIN genannt, reduziert sich in unserem Beispiel auf die Da- 

tenein- und -ausgabe sowie den zweimaligen Subroutineaufruf. Vor jedem Aufruf muß na- 
türlich noch festgelegt werden, nach welchem Begriff zu sortieren ist. Diesen Ablauf sehen 
Sie auch in Bild 12.1, während Bild 12.2 die BASIC-Version des gesamten Programms dar- 
stellt. © 
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Eingabe: 
N 


DIM K(N, 3) 
















S=2 
T=K(H2,L) 
| SORT B 
M=H2,H1+1,-1 
S=3 
K{M,L)=K(M-1,L) 
I SORT I 





T=K(H1,$) 






Ausgabe: 
K(L,1),K(L,2) 


Bild 12.1 Ablaufplan für die spaltenweise Sortierung von Punkten der Ebene 
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FEAT. 


i REM SFALTENWEISE SORTIERUNG WON FUNKTEN 
2 REM SPALTE: EC E33. [alt > 

!a INFUT"AHZAHL ";H :DIM KUN.2> 

2a FÜR L=1 TON 

za INPUT"R.T O"SKIL.1D.KIL.ED 

43 KXL,Z3=INTEELL. 132 


a NEST 
110 g=2 :GOSUB Sad REM SORT NACH 
124 5=3 :G0SUB Sad 'REM SORT NACH [x] 


150 FÜR Lei TON 
158 PRINT E£{L.i2.K£L. 2 
1 


DT) 
5 


REM UF SORT NACH SPALTE 5 

IF NZ THEN RETURN 

FÜR Hi=1 TO N-1 

T=K£H1.5> :REM VERGLEICHSWERT 

FOR Hz=Hil+l TO N 

IF KEHE,5>5=T THENESE 

FEM PUNKT HZ YÜR PUNKT Hi SETZEN 
FOR L=1 TO > 

T=KCHE.L> 

FÜR M=H2 TO Hi+r1 5TEF 1 
KrM.L>=KEM-1.L> 

HE=T 

KÜHl.L23=T 

NEST :REM FUNKTE LOKAL NEU GEOFDNET 
T=KiH1.52:REM NEUER YERGLEICHSWERT 
NE=T 

HE=T 

FETUFH 


m) IT EN Pe EEE IE La Pe a 
a a a a a a a a 


IT TRENNEN LEN ENENIN IN EN- 


7 


. 


Bild 12.2 Programm für die spaltenweise Sortierung von Punkten der Ebene 


12.2 Funktion 


Mit der Subroutine steht uns ein Weg zur Verfügung, Unterprogramme beliebiger Länge zu 
formulieren. Falls der Umfang jedoch auf die Berechnung eines arithmetischen Ausdrucks 
beschränkt ist, können wir das Unterprogramm auch als Funktion codieren. 


Eine Funktion muß dem BASIC-Interpreter bekannt sein, ehe sie erstmals benutzt 
wird. 


Eine Funktion wird definiert mit 
DEFFNxx (Argument)=arithmetischer Ausdruck 


FNxx ist der Funktionsname, wobei für xx der Name einer gewöhnlichen Variablen 
eingesetzt werden darf. 


Das Argument wird als gewöhnliche Variable geschrieben. 
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Die Reihenfolge hinsichtlich Definition und Aufruf ist hier also anders als bei Subroutinen. 
Doch auch der Aufruf einer Funktion erfolgt anders. Es ist dafür keine eigene Anweisung 
nötig. 

Eine Funktion wird aufgerufen durch Nennung ihres Namens und des aktuellen Ar- 

guments in einem arithmetischen Ausdruck. 

Das aktuelle Argument darf ein arithmetischer Ausdruck sein. 


Funktionsaufrufe dürfen also überall dort stehen, wo BASIC einen arithmetischen Ausdruck 
zuläßt: auf der rechten Seite einer Wertzuweisung, in der Liste eines Ausgabekommandos 
und im aktuellen Argument beim Aufruf einer anderen Funktion. Insbesondere dürfen in 
dem arithmetischen Ausdruck, mit dem eine Funktion definiert wird, andere Funktionen 
aufgerufen werden, vorausgesetzt, der BASIC-Interpreter kennt diese anderen Funktionen 
schon. 

Sehen wir uns nun an, wie eine Funktion beim Aufruf mit Zahlen versorgt wird. Falls 

außer dem Argument weitere Variablen im definierenden Ausdruck stehen, werden deren 
momentane Werte benutzt. Insoweit haben wir hier die gleiche Situation wie bei einer Sub- 
routine. Anders verhält es sich mit dem Argument. 


Beim Aufruf einer Funktion wird der Wert des aktuellen Arguments ermittelt und 
im definierenden Ausdruck anstelle des formalen Arguments verwendet. 


Beispiele: 

18 DEFFNF (X) = 2*X 

20 P=FNF (3.5) 
Hierdurch erhält P den Wert 7. 

18 DEFFNG(T) = 1 + SQR(T) 

20 T=2 

38 Q=FNG(T+2) 
Hierdurch erhält Q den Wert 3 (als 1 +.Y4). o 
Bemerkenswert ist, daß im 2. Beispiel nach Ausführung der 3 Zeilen T den Wert 2 trägt, 
obwohl die Funktion mit dem Argument 4 aufgerufen wurde. Sie kennen diesen Effekt 
auch schon aus Übung e). 


Ein formales Argument ist nicht identisch mit einer gewöhnlichen Variablen gleichen 
Namens. 


12.3 Mathematische Standardfunktionen 


Eine Reihe von Funktionen sind Bestandteil des com-BASIC. Diese unterscheiden sich hin- 
sichtlich der Namenskonventionen von den selbst geschriebenen. Beim Aufruf hingegen be- 
steht Übereinstimmung: Als aktuelles Argument ist ein arithmetischer Ausdruck zugelas- 
sen. Bild 12.3 zeigt Ihnen, welche mathematischen Funktionen vorhanden sind. Dazu ei- 
nige Bemerkungen. 
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Mathematische Bedeutung 
Schreibweise 















































lal ABS (A) Betrag 

arctan «a ATN (A) Arcustangens 

cos a COS (A) Cosinus 

e? EXP (A) Exponentialfunktion 
[a] INT (A) Größte ganze Zahl < a 
In a LOG (A) Natürlicher Logarithmus 





Gleichverteilte Zufallszahl 
e(0,1) 


RND (A) 








SGN (A) Signumfunktion 
SIN (A) Sinus 

SQR (A) Quadratwurzel 
TAN (A) Tangens 





Als A ist ein arithmetischer Ausdruck erlaubt. 


Bild 12.3 Mathematische Standardfunktionen 


LOG erfordert ein positives Argument, während das von SQR nicht negativ sein darf. 


Das Argument von SIN, COS und TAN wird als Winkel im Bogenmaß interpretiert. Das Er- 
gebnis von ATN ist ebenfalls ein Winkel im Bogenmaß und zwar aus dem Intervall (-/2, 
m/2). Der Zusammenhang zwischen einem Winkel im Bogenmaß WB und dem entsprechen- 
den Winkel im Gradmaß WG ist durch folgende Gleichung gegeben: 


WB _ WG 
n 180 
SGN kann 3 Werte annehmen: 
-1,fallsı A<® 
SGN (A) = Ö,fals A=9 
1, falls A>® 


Mit RND wird ein Zufallszahlengenerator aufgerufen, der über das Argument beeinflußt 
werden kann. Hierfür empfiehlt sich die Variable TI, weil deren Wert ständig verändert 
wird. 


12.4 Direkter Speicherzugriff 


In diesem Abschnitt wollen wir zwei über BASIC hinausgehende Kommandos ansprechen: 
PEEK und POKE. Der Anfänger sollte sie jedoch unbedingt meiden; denn bei fehlerhaftem 
Gebrauch kann die Folge sein, daß nichts mehr geht. Sie müssen dann notfalls den Rechner 
abschalten und verlieren zumindest das gerade geladene Programm. 
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PEEK (a) 

liefert Ihnen den Inhalt der Speicherstelle a. 

POKE a, w 

erzeugt in der Speicherstelle a den Wert w. 

Die Adresse a liegt zwischen 0 und 65535, der Wert zwischen O und 255. 
Der Gebrauch dieser Kommandos sollte erst in Erwägung gezogen werden, wenn Sie an die 
Leistungsgrenzen Ihres Rechners stoßen, d.h. wenn die Größe des Hauptspeichers oder die 
Verarbeitungsgeschwindigkeit nichtmehr ausreichen. Wie Platzprobleme umgangen werden, 
ist in Abschnitt 9.3 erläutert. In Beispielen aus Kapitel 14 wird z. T. direkt in den Bild- 
schirmspeicher ausgegeben, was gegenüber der PRINT-Anweisung einen Zeitgewinn be- 
deutet. 


12.4 Aufgaben 


12-1 Aus n Werten x;,X2, ... , X„n erhält man den Mittelwert x und die Varianz v durch 


EEE u, 


Schreiben Sie ein Programm zur Berechnung von Mittelwert und Varianz so, daß 
beide auftretenden Summen in einem Unterprogramm berechnet werden. 


31m 


12-2 Zwischen sinx, cosx und tan x bestehen u.a. die Beziehungen 


2 
sinx vl- (cos x) 
tanx = tan x = —— — 
„1 - (sin x)?’ co5 X 


Diese lassen sich nutzen, um mit der Funktion ATN z.B. für sin x die Umkehrfunk- 
tion arcsin x zu gewinnen, d.h. eine Funktion, die bei Vorgabe des Sinuswertes (et- 
wa auf dem Platz SX) den zugehörigen Winkel im Bogenmaß berechnet. Schreiben 
Sie je ein Funktionsunterprogramm für arcsin x und arccos x. 
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13 Textverarbeitung 


Bislang haben wir Zeichenketten als nahezu unveränderliche Elemente betrachtet. Wenn 
wir den Wert einer Stringvariablen ändern wollten, geschah das immer von außen, immer 
durch eine Eingabeanweisung. Das geht auch anders, wie die folgenden Übungen zeigen. 


a) Schreiben Sie 
?:? CHR$ (77); CHR$ (85); CHR$ (84) 
Beherzigen Sie das Ergebnis und fahren Sie fort. 


b) Schreiben Sie 


10Ad=” “ 

20 FOR K=1T07 

30 AS = Aß + CHR$(64 + K) 
49 NEXT 

5 ?A8 

RUN 


c) Jetzt wollen wir uns ansehen, was aus einem Nabel werden kann. 


10 AZ$ = ’NABEL“ 

20 H8=LEFT$(AZ$, 2) 

30 AZ$ = RIGHT$(H$, 1) + LEFT$ (HS, 1) + AZ 
40 AZS = AZ$ + RIGHTS (AZ$, 1) + LEFTS(AZS, 1) 
50 2:2 AZ$ 

RUN 


Versuchen Sie kurz, die Entstehung des Namens nachzuvollziehen. 


13.1 Zeichendarstellung 


Ihr cbm-Rechner arbeitet intern rein numerisch. Wenn er trotzdem in der Lage ist, Zeichen 
und Worte zu speichern und damit zu hantieren, dann nur deshalb, weil jedem zulässigen 
Zeichen ein Zahlenwert zugeordnet worden ist. Wenn Sie beispielsweise die Buchstaben 
ABC eintippen, speichert der Rechner dafür 65, 66 und 67 und merkt sich, daß der Inhalt 
der fraglichen Speicherstellen einen String darstellt. Lassen Sie diesen Inhalt später auf dem 
Bildschirm zeigen, wird die Zahlenfolge automatisch in die entsprechenden Zeichen umge- 
wandelt: Sie sehen wieder ABC. Dieser Umwandlung liegt der ASCII zugrunde (American 
Standard Code for Information Interchange). 
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Mit 2 Funktionen können Sie die ASCII-Codeumwandlung direkt veranlassen: 


ASC(A$) liefert die Zahl, die dem ersten Zeichen des Strings A$ entspricht. 
CHR$ (N) liefert für eine Zahl N zwischen ® und 127 das entsprechende ASCII- 


Zeichen. 

Beispiele: 
?ASC(’’1A“‘) zeigt auf dem Bildschirm den Code der Ziffer 1, und das ist 49. 
?CHR$ (81) zeigt auf dem Bildschirm ein Q. © 


13.2 Zahlenumwandlung 


In Berechnungen mit gewöhnlichen Variablen arbeitet Ihr Rechner intern mit seiner Stan- 
dard-Zahlendarstellung. Veranlassen Sie ihn, auf dem Bildschirm eine Zahl auszugeben, 
wandelt er die interne Form in eine Zeichenfolge um und zeigt diese an. Dabei können 
neben den Ziffern, dem Buchstaben E und dem Punkt noch das Plus- und Minuszeichen 
sowie Leerstellen auftreten. Mit Hilfe einer Funktion kann die gleiche Umwandlung einer 
Zahl in einen String auch im Programm durchgeführt werden 


STR$(A) wandelt den Wert des arithmetischen Ausdrucks A in einen String um. 


Beispiel: 
Nach A$ = STR$(m) steht auf A$ der 11-stellige String ” 3.14159265‘“. © 


Entsprechend wird verfahren, wenn die STR$-Funktion mit einem Integer-Argument auf- 
gerufen wird, nur ist dabei der Zahlbereich deutlich kleiner. 


Zu STR$ existiert auch eine Umkehrfunktion: 


VAL (S$) wandelt den Anfang des Strings S$ in eine Zahl um, soweit er umwandel- 
bar ist. 

Beginnt der String mit einem in Zahlen unzulässigen Zeichen, wird der Wert ® ge- 
liefert. 


Beispiel: 
VAL (’’17/2°) hat den Wert 17. Fr 


Zulässig sind höchstens die im ersten Absatz dieses Abschnitts aufgeführten Zeichen. Als 
Basis für die Umwandlung wird eine Folge zulässiger Zeichen aber nur soweit genutzt, wie 
sie als Zahldarstellung sinnvoll ist. So wird der String z.B. spätestens vom zweiten E ab 
ignoriert. 


13.3 Stringverarbeitung 


Neben den bisher erörterten Umwandlungen von Zahlen in Strings und umgekehrt gestat- 
tet cbm-BASIC auch die Stringverarbeitung in einem mehr wörtlichen Sinn. Man kann 
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Strings zu einem gemeinsamen String vereinigen oder einen beliebigen zusammenhängen- 
den Teil eines Strings (als Kopie) herausgreifen. 


A$ + B$ bildet einen String, der in dieser Reihenfolge die Zeichen des Strings A$ 
und die aus B$ enthält. 


Beispiel: 
Mit G$ =’GERECHT“:M$ ="MUND“:S$ = M$ + G$ ergibt sich auf S$ der String 
»MUNDGERECHT“. 


Wenn wir hier das gewöhnliche Additionssymbol wiederfinden, heißt das natürlich keines- 
falls, daß eine Zahl zu einem String addiert werden könnte. Ebenso unsinnig wäre, Strings 
mit einem der anderen arithmetischen Operatoren zu verknüpfen. 

Um einen Teil aus einem String herauszugreifen, muß man angeben, wieviel Zeichen über- 
tragen werden sollen und wo diese Zeichengruppe im Ausgangsstring liegt. Drei Funktio- 
nen stehen zur Verfügung: 


LEFT$(S$, N) liefert die ersten N Zeichen des Strings S$. 

MID$ (S$, M, N) liefert die beim M-ten Zeichen beginnende Gruppe von N Zeichen 
aus dem String S$. 

RIGHT$(S$, N) liefert die letzten N Zeichen des Strings S$. 

N ist eine Zahl zwischen ® und 255, M zwischen 1 und 255. 


Beispiele: 


Mit AZ$ = "ANNABELLA“ erhält man 

»ANNA“ durch LEFT$(AZ$, 4) 

»NABEL“ durch MID$(AZ$, 3, 5) und 

PELLA“ durch RIGHT$(AZ$, 4) nu 
Die Positionierung des herauszulösenden Teilstrings erfolgt stets in der eben erklärten Form. 
Falls dann nicht mehr N Zeichen verfügbar sind, wird der Ergebnisstring entsprechend ver- 
kürzt. Diese Situation kann vom Programm erkannt werden; denn es existiert eine Funk- 
tion, die die Anzahl der Zeichen eines Strings ermittelt. 


| LEN (S$) liefert die Länge des Strings S$ 













ASC (S$) Beispiel: 

CHR$ (N) Mit dem obigen AZ$ trägt LEN (AZ$) den Wert 9. 
LEFT$(S$, N) . 
LEN (S$) 


Eine Zusammenstellung der zur Textverarbeitung 
verfügbaren Funktionen zeigt Bild 13.1. 


MID$(S$,M, N) 
RIGHT$ (S$, N) 
STR$(A) 
VAL (S$) 
S$ ist ein String 
M liegt zwischen 1 und 255 
N liegt zwischen ® und 255 










Bild 13.1 
Stringfunktionen 
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13.4 Aufgaben 


13-1 Eine Zahl wird auf dem Bildschirm in halblogarithmischer Form ausgegeben, wenn 
Ihr Betrag gewisse Grenzen unter- bzw. überschreitet. Wie können Sie ohne Benut- 
zung dieser Grenzen erreichen, daß dann in der Mantisse stets genau 3 Stellen hinter 
dem Dezimalpunkt stehen? 

13-2 Schreiben Sie ein Programm, das einen String liest und die darin enthaltenen ver- 
schiedenen Zeichen je einmal auf dem Bildschirm ausgibt. Die Zeichen sollen fort- 
laufend nebeneinander stehen. 


13-3 Ändern Sie das Programm für Aufgabe 13-2 so ab, daß die Zeichen aufsteigend sor- 
tiert ausgegeben werden. 
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14 Demonstrationsbeispiele 


Wie in den vorangegangenen Kapiteln wird auch hier in erster Linie das Ziel verfolgt, den 
Leser zur Entwicklung eigener Programme zu befähigen. Im Vordergrund steht der De- 
monstrationswert und nicht die vielseitige Verwendbarkeit der Programme. Dennoch wur- 
den diese so aufbereitet, daß sie unmittelbar benutzt werden können. 


Bei der Auswahl der Beispiele wurde darauf geachtet, daß Problem und Lösungsweg auch 
ohne viel Fachwissen aus dem jeweiligen Anwendungsgebiet verstanden werden können. 
Daher sollten Sie nach Möglichkeit alle Beispiele durcharbeiten und sich nicht auf Ihr 
Fachgebiet beschränken. 


14.1 Lineare Interpolation 


Problem: In einem (X, Y)-Koordinatensystem sollen N Punkte (X;, Y;), 1Si< N gege- 
ben sein mit aufsteigenden X-Werten. Benachbarte Punkte sollen durch eine Strecke ver- 
bunden und die Randstrecken als Halbgeraden herausgezogen werden (s. Bild 14.1). Aus 
diesem Linienzug ist für beliebige Argumente X der zugehörige Funktionswert zu ermit- 
teln. 

Dieses Problem stellt sich z.B., wenn mit tabellierten Funktionen gearbeitet wird. Auch 
für die Auswertung von Meßreihen ist die lineare Interpolation oft ausreichend. Dagegen 
darf die verabredete Extrapolation in Form der Halbgeraden in Anwendungsfällen nur be- 
nutzt werden, wenn die durch den Linienzug angenäherte Funktion tatsächlich ein ent- 
sprechendes asymptotisches Verhalten zeigt. 

Programme sind selten auf Anhieb fehlerfrei. Vielmehr decken systematische Programm- 
tests gewöhnlich nach und nach die Lücken auf. Im Laufe der Zeit entsteht eine Ahnen- 
kette von Programmen, die immer leistungsfähiger werden (sollten). Wir wollen an diesem 
Beispiel zeigen, wie die verschiedenen Entwicklungsstufen aussehen könnten. 


Lösungsweg: Zuerst werden die N Punkte eingegeben und danach in einer unendlichen 

Schleife immer abwechselnd ein Argument X gelesen, das zugehörige Y berechnet und X 
und Y ausgegeben. Um Y berechnen zu können, müssen wir im Regelfall den Index K be- 
stimmen, für den X(K)>X, aber X(K - 1) <X ist. Aus der 2-Punkt-Form der Geraden- 


gleichung erhalten wir dann 
XTXK-1 
Y=Gxk =Yk-ıt (Yk YK-ıy x. 
KAÄK-1 


Bild 14.1, Version a, zeigt einen ersten Entwurf für einen entsprechenden Ablaufplan. 
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Eingabe der Wertetabelle 
X(K),Y(K),I1<KsN 








18 Abschnitt 
14.1 


Ausgabe: 
X,Y 
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X(N-2) X(N-1) 


b) 


Eingabe der Wertetabelle 
X(K),Y(K),I<K<sN 


Eingabe: 
X 


Ausgabe: 
X,Y 


Bild 14.1 Prinzipskizze und Ablaufpläne für die lineare Interpolation 





X(N) 


X 


14.1 


_ a" 


Bei der Ausführung des Programms wird in der Regel auf dem Ja-Ast aus der Schleife her- 
ausgesprungen. Der BASIC-Interpreter stößt dann beim nächsten Durchgang wieder auf 
den Schleifenanfang, ohne zuvor die alte Schleife geschlossen zu haben. Das ist zwar nicht 
grundsätzlich störend, kann aber mit dem in Bild 14.1, Version b, gezeigten Ablauf leicht 
vermieden werden. 


Der Ablaufplan, Version b, erfüllt die eingangs gestellten Forderungen nocht nicht ganz. 
Versuchen Sie, die verbliebenen Schwachstellen bzw. die Fehler selbständig herauszufin- 
den. Ohne bei der weiter unten angegebenen Lösung nachzusehen, sollten Sie den Plan b 
in ein BASIC-Programm übertragen und dieses mit einfachen Testdaten überprüfen. Dabei 
werden sich fast immer die richtigen Werte ergeben, falls Sie bei der Codierung keine Feh- 
ler begangen haben. 


Ihr Test sollte als Ergebnis bringen, daß im angegebenen Ablaufplan die Fälle X < X (1) 
und X>X (N) falsch behandelt werden. Gilt X < X (1), wird in der Interpolationsformel 
mit den Indizes ® und 1 gearbeitet, beabsichtigt waren aber I und 2. Für X >X(N) wird 
die Formel gar nicht erreicht, so daß der alte Y-Wert noch einmal erscheint. Gefordert war 
hingegen die Berechnung mittels der Indexwerte N-] undN. 


Nun gilt es, mit möglichst wenig Aufwand die erkannten Fehler zu beseitigen. Da für 

X <<X(1) und X zwischen X (1) und X (2) beide Male mit dem Indexpaar 1 und 2 gerech- 
net werden soll, erübrigt sich der Vergleich von X mit X (1). Daher lassen wir die Schleife 
erst mit K = 2 beginnen. Entsprechend müssen wir verhindern, daß der Vergleich von X 
mit X(N) Konsequenzen hat, was durch die Erweiterung der Abfrage auf „X(K) <X und 
K< N“ gelingt. Diese Bedingung ist für K = N nicht erfüllt, so daß in diesem Fall 

(X (N -1) <X) mit den Indexwerten N - 1 und N interpoliert wird. Schließlich sollten 
unsinnige Werte von N, d.h. N < 2, zurückgewiesen werden. Wenn Sie Ihr Programm ent- 
sprechend abändern, müßte es weitgehend mit der Lösung aus Bild 14.2 übereinstimmen. 


FED. 
10 REM #%*# LINEARE INTERFÜLATICN #6 
29 REM FUHKTWEISE GEGEFENER FUHKTIONEN 
4 REM 
Sa REM FLNKTICN EINGEBEN 
102 INPUT "ANZAHL" IN I 
11a IF HN THEN PRINT "ZU KLEIN" :GOTOLER 
128 DIM SEND. TcH) km 
125 PRINT "FÜUNKTE EINGEBEN. ® WACHSEND 
140 FOR ES TH 0 
159 INPUTTSTTIBEKODG EKD _ 
1EA IF Kl OR SCHOSSCcK-1> THEN 150 u 
174 FFINT "X-WERT ZU KLEIN. REGELEHNT" :E=SK-1 
120 NEST \ 
=@g4 FEM ARGUMENT EINGEREN. FU.-WERT FERECHNEN 
218 INPUT "RRBUMENTT ER 
zer FÜR Kai Tot 
239 IF XCKICK AND KSN THENZER ug A142 
Sa Per El HP EED-PEK- I DESS-NCE- ID FSSCESTSCE- 120 u 
San K=H ROLUHOTERT Programm für lineare 
ze NEMT Interpolation 
S70 PRINT "Berk, Wet 
zen GOTO Z18 
FEHLT. 
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14.2 Arcustangens 


Problem: Für einen beliebigen Punkt P der (X, Y)-Ebene ist der Winkel zwischen der Strek- 
ke von P zum Ursprung und der positiven X-Achse zu ermitteln. P soll durch seine Koor- 
dinaten, X und Y, gegeben sein. 

Möglicherweise erinnern Sie sich an die Funktion ATN, die ja zu einem bekannten Tan- 
genswert den zugehörigen Winkel im Bogenmaß liefert. Mit dem Aufruf ATN (Y/X) scheint 
unser Problem gelöst. Da aber die Quotienten (- Y)/(- X) und Y/X den gleichen Wert ha- 
ben, liefert die ATN-Funktion für den Punkt (X, Y) den gleichen Winkel wie z.B. für den 
Punkt (- X, - Y), während sich in Wirklichkeit die beiden Richtungen um den Winkel r 
unterscheiden. 

Die Lösung soll als Unterprogramm formuliert werden, damit sie unmittelbar in anderen 
Programmen verwendet werden kann. 


Lösungsweg: Das Unterprogramm ist nur in Verbindung mit einem Hauptprogramm 
(MAIN) ausführbar. Deshalb müssen wir dieses zusätzlich erstellen und dort alles erledigen, 
was über den geforderten Leistungsumfang des Unterprogramms hinausgeht. Dazu zählt in 
erster Linie der Datenaustausch mit dem Benutzer. Daneben lassen wir die Ergebnisse noch 
von Bogen- in Gradmaß umrechnen, was manchem die Ergebniskontrolle erleichtern wird. 
Nun zum Uhnterprogramm. Als Eingänge verwenden wir die Variablen X und Y, das Ergeb- 
nis steht auf A. Dem unsinnigen Fall X = Y = ® schenken wir keine Beachtung, so daß drei 
Fälle zu behandeln sind. Das soll so geschehen, daß die Ergebnisse in das Intervall (- r,] 
fallen. Dabei ist übliche Konvention, positive Winkel entgegen dem Uhrzeigersinn und ne- 
gative im Uhrzeigersinn aufzutragen. 

X und Y#B. Bei positivem X liefert ATN den richtigen Wert, während bei negati- 
vem X um r korrigiert werden muß. Um das obige Intervall zu treffen, koppeln wir diese 
Korrektur an das Vorzeichen von Y. 

Y =. Je nach Vorzeichen von X muß sich als Ergebnis ® oder r ergeben, was mit Hilfe 
der SGN-Funktion einfach codiert werden kann. 

X =. Je nach Vorzeichen von Y muß sich m/2 oder - n/2 ergeben, was wiederum mit 
Hilfe der SGN-Funktion codiert wird. 

Bild 14.3 zeigt u.a. das entsprechende Unterprogramm, das in allen Anwendungen benutzt 
werden sollte, in denen zwischen einer Richtung und der Gegenrichtung unterschieden wer- 
den muß. 
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READY. 
iaa FEM TEST-MAIN F. ARCTAN 
11a INPUT". "ir 
120 GÜSUF 1006 
134 FRINT "WINKEL IN GRAD!" A&120, "RT 
140 GOTO 118 
iaac REM k# LP ARCTAN ER 
1510 REM EIN:#&.T. AUS:ARSARCTANDTSSS.A LIEGT IN im. m] 
iazo IF a=0 THEN A=36GHir diene: GOTOlCSE 
ia2g IF = THEN A=ll-36N882 er GOTOLGSEO 
ia A=ATHiTS 
ıaSa IF sa THEN A=A+3GHit 
1260 FETLFN 
FERIT. 


Bild 14.3 Arcustangens-Programm 


14.3 Gemeinsamer Geburtstag 


Problem: In einer Menge von 367 Personen befinden sich mit Sicherheit zwei, die ihren 
Geburtstag am selben Tag feiern. Wenn Sie nun zufällig zusammengesetzte Personengrup- 
pen nach Geburtsmonat und -tag befragen, finden Sie ein Paar, das gemeinsam feiern könn- 
te, oft schon nach relativ wenigen Interviews. Dieses statistische Phänomen wird hier in 
der Form eines Ein-Personen-Spiels vorgestellt. 


Lösungsweg: Die Befragung wird mit Hilfe des Zufallszahlengenerators simuliert. Er liefert 
zuerst eine Zahl aus dem Intervall [1, 12], die als Monat angesehen wird. In Abhängigkeit 
davon wird das Intervall für die Tage festgelegt, also [1, 29], [1, 30] oder [1, 31] und dar- 
aus eine Zufallszahl ermittelt. Falls dieses Zahlenpaar schon einmal vorkam, wird die Be- 
fragung beendet, andernfalls wird es gespeichert und der nächste Geburtstag erfragt. 

Zu Ihrer Information werden alle Befragungsergebnisse angezeigt. Zuvor werden die Zah- 
len in einem Unterprogramm in Strings mit 2 Zeichen umgewandelt. Dadurch läßt sich 
auch mit dem Semikolon als Listentrennzeichen die Ausgabe spaltentreu aufbauen. Das 
Programm zeigt Ihnen Bild 14.4. 

Die Erklärung für die meist erstaunlich kleine Zahl zu befragender Personen setzt Kennt- 
nisse in Wahrscheinlichkeitsrechnung voraus. Wir wollen hier nicht darauf eingehen und 
verweisen den interessierten Leser auf die entsprechende Fachliteratur. 
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REM #+# GEMEINSAMER GEEURTSTAG #%% 
FEM 


DATA31.23.21.20.21.20,.21.21. 20, 21.30. 1 


IIM TGi122.Mi2Ee>. Te3EE> 
FÜR K=1 TO 12:FERAD TGcE> SNEHT 


FEINT" I GEMEINSAMER GEREURTSTAG #48": FEINTIFRINT 


3 FRINT"ZUFRELLIG AUSGEHREHLTE FERSÖHEN SOLLEN" 

3 FEINT"HACH IHREM GEEURTSTAG CTAG. MONAT: FE=" 

3 FEINT"FRAGT WERDEN. EIS EIN FARR MIT GLEICHEM" 

3 FRINT"GEEURTSTAG GEFUNDEH WIED." 

A FEINT"SCHAETZEN SIE DIE ERFORDERLICHE ANZAHL. " 

4 FRINT:FEINT"DER FECHHER SIMULIERT DIE BEFERGUNG UNI 


FEIHT"BERECHHET DIE GUETE IHRES SCHAETZWERTES. "  FREINT 
IHFUT"MIEWIEL FERSÜHEHN WIED ER FRAGEN"SW 

IF 2 THENZAO 

ERINTÜSUNFRAGESERGEENTS U FRINT 

= 

M=1+IHTÜ1E#ENDETI>2 

T=1+1HTETGEMS#ENDETIS> 


= H=T :GoSUBEaG :FRIHT H$:".": 
> H=M:GOSUReGOa :FRINT HF". " 


IF N=a THEN=UG 

FÜR K=1 TON 

IF M=MiE> ANDT=TEE> THENJER 

HE=T 

H=N+1 

M{N>=HM 

TEH>=T 

GOTOZIFE 

H=HN+1 

FRIHT:FEINT:FRINT"HE"SN: "UND HNE":E 
FEINT"HÄABEN GEMEINSAM GEEURTSTAG. " 


ı PRINT"SIE HATTEH" WE "FERSÖHEN YÜRGEGEBEH" 
4 IF W=HTHEHSEE 
a YN=RESCW-N SFRINT"FEHLER:"2WH: "PERSONEN BEH.": 


FEIHT IHTTZOORWN FEW +NDE NE" 

GOTOSIE 

ERINTÜIHRE "ORHERSAGE HAR ALSO EICHTIG" 
INFUT"GEFEN SIE E ODER WH EIN. «ENDE FEN WEITER>":H$ 
IF H&="4W" THENIAG 

IF H$="E" THEH EHI 

GITOSZE 

IHFUT" 

HE=STRF CH) 

H1=LENHF$>-1 

H$=RIGHT$ÜH$. HL: 

IFH1ZZTHENNF=" "+H$ 

FETUFH 

EHD 


Bild 14.4 Gemeinsamer Geburtstag 
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14.4 Normierte Zahldarstellung 


Problem: Wenn der Zahlenwert einer Variablen unmittelbar auf dem Bildschirm ausgege- 
ben wird, kann die Darstellungsform nicht beeinflußt werden. Das stört z.B. bei der Aus- 
gabe von Kolonnen, die hier linksbündig geschrieben werden. Es stört auch, wenn unab- 
hängig von der Präzision der Eingangsgrößen die Ergebnisse technischer Berechnungen mit 
9 scheinbar signifikanten Ziffern erscheinen. Daher stellen wir hier ein Unterprogramm 
vor, mit dem Zahlen in der Form 


tx.xxxxE+txx 


ausgegeben werden können. Die Anzahl der Ziffern im gebrochenen Teil der Mantisse ist 
frei wählbar. 


Dieses Beispiel demonstriert außerdem den Gebrauch der verschiedenen Stringfunktionen. 


Lösungsweg: Die darzustellende Zahl wird auf ZA erwartet und auf NZ die Anzahl der in 
der Mantisse hinter dem Punkt aufzuführenden Ziffern. Das Ergebnis wird auf ZA$ als 
String der Länge NZ + 7 geliefert. Bei der Aufbereitung wird von STR$ (ZA) ausgegangen. 
Diese Funktion liefert einen String mit der gleichen Zeichenfolge, wie die Zahl bei direkter 
Ausgabe auf dem Bildschirm erschienen wäre. Die Mantisse einschließlich des Vorzeichens 
wird als String beibehalten (H$), während der Exponent in seine numerische Form über- 
führt wird (H3). Trat kein Exponent auf, erhält H3 den Wert ®. 


Jetzt muß der Punkt in der Mantisse hinter die erste Ziffer geschoben werden. Damit das 
nicht den Zahlenwert verfälscht, erfolgt ein entsprechender Ausgleich im Exponenten H3. 
Dieser wird anschließend in einen String umgewandelt und in den Ergebnisstring eingear- 
beitet. Dabei sind eine Reihe von Sonderfällen zu beachten, wie Sie dem Ablaufplan (Bild 
14.5) und vor allem dem Programm (Bild 14.6) entnehmen können. 
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H$ = Mantissenteil von ZA$ 
H3 = H3 = Wert des Exponenten 


Lage des Punktes ermitteln. 
Ggf. Punkt anfügen. 





Punkt verschieben und 

Exponent H3 anpassen. 
Vorzeichen und signifikanten 
Teil der Mantisse nach ZA$. 


ZAS$ auf geforderte Stellenzahl 


verlängern oder verkürzen. 





Exponent in String umwandeln, 
ggf. aufnullen und Vorzeichen 
setzen und hinter Mantisse und 
»E“in ZA$ anfügen. 


Bild 14.5 Grober Ablaufplan zur Ausgabeaufbereitung von Zahlen 
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REHAIDT. 
ig REM TEST-MAIH F.HÜRMZAHL 
2a INPUT"ZR.H2"SEN.NZ 


20 GOSUBSEEE 
4a PRINT ZA :G0T018 
and REM ek LP NÜRMIERTE ZAHLIARSTELLUNG ##* 
391 REM EIN: FA=ZAHL. NE=SAHZAHL STELLEN HINTERM FUHET. AU=:ERF 
=aad IF ZA=G THEN ZAF=" 9." :H2ea !GOTOZO3S 
SAGE SAF=STRELER> :HISLENKERFI !IF H125 THENZBIE 
zaas IF MIDSCEA$.H1-3: 1X "E" THEN ZUle 
=a1A HE=LEFTEGIERE. H1-4: :H3=WRLIRICHTFL ERS. 222 :GOTO2814 
Salz Hfsäfnf :H3=i 
414 SAS=LEFTECHS.1: :REM "ORZEICHEN DEF MANTISSE 
ale HI=LENCHF:-1 


=318 H$=RIGHTECHE.H1) :FEM MANTISSE OHNE VÜRZEICHEN 

Sa FÜR Ho=i To Hi :IF MIDSÜH$.H2.1I="." THENZOE4 

2921 NEXT 

=a22 H6=H$+"." SHi=Hl+i H2=Hl 

=g24 IF H2=2 THEN FAF=ZAF+HE :G0TO2033 

Saze IF H2>2 THENZES4 

=a22 FÜR H2=> TU Hi :Hä=H3-1 :IF MIISCHE.H2.15>"2" THENZOSZ 
za NEXT 

2431 STOP 

a2 SAS=TA$+MIDSCHE. HZ, 13+". "+RICHTFEHS.HI-H2D SGOTO2E3S 
amd IAS=IA$+LEFTSCHE. 134". "+MIDECHE. 2. H2-ZHRIGHTECHEHI-HED 
Sa H3=H3+H2-2 

=a=2 FOR H3=1 TO NE :SAge2As+"a" NET 


2940 IAF=LEFTFCERF.NZ+Z> !REM MANTISSE FERTIG 

2ad2 HE=5TREÜH2> SHI=LENCHE>-1 

za4d4 IF LEFTECHE. 15505"-" THEN H£="+"+RIGHTFÜHF.HI1> 
a4 SAF=IAFH"E"+LEFTEEHF.1> :IF Hi=1 THEN ERt=EhsH"e" 
a4 ZAF=ZAF+RIGHTFEHF.H1D RETURN 
FERI'T. 


Bild 14.6 Normierte Zahldarstellung 


14.5 Farbige Symbole 


Problem: Wenn in elementarer Form ständig neue Werte auf dem Bildschirm angezeigt 
werden, rollt das Bild nach oben weg. Für manche Anwendungen ist es hingegen erforder- 
lich, die aktuellen Werte immer an bestimmten Stellen eines feststehenden Rahmens 
(auch Maske genannt) zu zeigen. 


In diesem Beispiel sollen in einem Anzeigebereich von 20 X 20 Plätzen des Bildschirms 
beliebig oft verschiedene Symbole dargestellt werden. Die Farbe der Symbole wird 
variiert. 


Lösungsweg: Mancher Leser mag versucht sein, bei derartigen Aufgaben den POKE-Be- 
fehl zu nutzen. Programme, die PEEK oder POKE enthalten, sind aber so maschinen- 
spezifisch, daß sie kaum auf andere Rechner übertragen werden können. Diese Programme 
versagen mitunter schon, wenn Sie den Speicher Ihres Rechners erweitern oder eine zuvor 
vorhandene Speichererweiterung entfernen. Deshalb wird hier ein Lösungsweg gezeigt, 
der mit reinen BASIC-Anweisungen auskommt. 
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Beliebige Bildschirmpositionen lassen sich dadurch ansteuern, daß über “HOME” auf 
einen festen Bezugspunkt und von hier mit der erforderlichen Anzahl von „Cursor rechts‘- 
und ‚‚Cursor abwärts‘‘-Bewegungen zum gewünschten Platz gegangen wird. Für den Ge- 
brauch in einem Programm (s. Bild 14.7) müssen diese Tasten in der maximal benötigten 
Anzahl als Strings gespeichert werden (Zeilen 10 und 20). Im PRINT-Befehl (Zeile 90) 
werden dann Teilstrings ausgegeben, deren Länge zuvor mit dem Zufallszahlengenerator 
festgelegt wurde. 

Den Gebrauch des Zufallszahlengenerators wollen wir anhand der Farbwahl erläutern 
(Zeile 70). RND (TI) liefert einen zufälligen Wert zwischen O und 1, die 1 kommt aber 
nicht vor. Nach Multiplikation mit 8 und Abschneiden des gebrochenen Anteils ergeben 
sich ganze Zahlen zwischen O und 7 und für A schließlich Werte zwischen 1 und 8 ein- 
schließlich der Grenzen. Aus dem String F$ mit den möglichen Farben (Tasten CTLR 
u. 1 bis CTLR u. 8) wird dann in Zeile 90 der in F$ an Platz A stehende Wert ausgegeben. 


Nach dem Programmstart füllt sich der Bildschirm allmählich mit bunten Symbolen. Ein 
Teil der Plätze bleibt jedoch frei, bzw. diese werden mit weißen (= unsichtbaren) Sym- 
bolen bedruckt. 


FRINT" I" 2$=" Simelnteieieleielelsisteisieieisinteintelaie]" 
Zf="IBBbBBBBBBBBBBBBDERBBR 
FIRE" 

Ar=" erg" 

Z=1+INTIENDETISKZID 
S=1+IHTERNDETISHEED 
F=i+IHTIRNDETI?#2> 

H=1+IHTERNIETISESN 

FFINTLEFTEÜSF Z+H1:: LEFTEEFR SSINIDHFEFISSMIDEUHRER. A. 12 
35 GOTOSE 

FEADT. 


Bild 14.7 Farbige Symbole 


Den EN Le LI te 
RR TE 
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14.6 Zahlget 


Problem: bei besonderen Anwendungen ist es störend oder gar unmöglich, Eingabewerte 
über den Bildschirm einzulesen (INPUT). Dann wird eine Routine benötigt, die es ge 
stattet, Zahlen — und nicht nur einzelne Zeichen — direkt von der Tastatur zu über- 
nehmen. 


Lösungsweg: In den Zahlen dürfen neben den zehn Ziffern noch ein Dezimalpunkt und 
ein Vorzeichen auftreten. Nach Wahl des Benutzers werden auch beliebige sonstige 
Zeichen angenommen, die er im String Z1$ vorgeben muß. Diese Zeichen, hier Steuer- 
zeichen genannt, sowie die Return-Taste werden natürlich nicht in die gelesene Zahl Y$ 
eingesetzt. Sie werden dem Benutzer in Y1$ übergeben. Jedes dieser letztgenannten 
Zeichen führt zur sofortigen Rückkehr ins rufende Programm. Dort kann mit VAL (Y$) 
der Wert der bis dahin aufgelaufenen Zahl gewonnen werden. 

Einen groben Ablaufplan für “ZAHLGET“ finden Sie in Bild 14.8, das entsprechende 
Programm zeigt Ihnen Bild 14.9. 


14.6 Zahlget 9] 


START 
UP "ZAHLGET“ 


Definition von Hilfswerten 


Warten auf ein nicht leeres 
Zeichen von der Tastatur 


Kam 
RETURN-Taste ja 
oder ein vom Benutzer 
definiertes Steuerzeichen 
Kam 
nein ein in der 


aktuellen Zahl 
noch erlaubtes Zeichen 


Zeichen merken. 
Sicherstellen, daß nach 
dem Punkt nur Ziffern 


anerkannt werden und ein 
Vorzeichen allenfalls als 
erstes Zeichen auftritt. Bild 14.8 Grober Ablaufplan für ‚‚Zahlget‘ 





u en 


GOZUE Sa 

FF INT" siele]'" . Ti 

IF TiF="E" THEN EHI 

ris=7 | SET Tif: Ifrig="" THEN Dia 
Ir Ti1sı-"E" THEH 1 


CDOT EN Lama 
az a a a a 
m 
nn 
pe 
a 


Er9 REM ZAHL + ZTEUEFZEICHEH “OH TASTPTUR 
5@ REM EIN: !$=5TEUERZEICHEN. Alm FE=ZHHL,  FIE=AKT. STELERZEICHEH 
16 EuF=" le 4SErgaB, +-" 
15! T$= mar - gel: er 

aaza GET is: IF ide"" THEN DENE 


IF m =CHRFi122 THEM FETUFEH 

FÜR ve TO LEHNWZIE: 

IF Ti$=MIDELZIF,'.1: THEN RETURN 
HE= T T 

FÜR r=1 TO TE 

IF Tis<>MIDsiZor.T.1: THEN 2026 
get ri$ 


TORI RIU EISEN EINE 
a a 0 a a 


BMI Lana parf 


WEICH ET EIERN 


IF Tall THEH YTBsil 
5) IF '=11 THEH Ta=lıa 
5 HEHT Tr 


DOG Een nina in 


GETO 3928 


Tı (5 
min 


Bild 14.9 Unterprogramm ZAHLGET 
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mein 
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14.7 Bewegte Figur 


Problem: Als Zusatz zum VC2O wird die ‚„Supererweiterung VC1211‘ mit einer ‚„‚hoch- 
auflösenden Grafik‘ angeboten. Als erste Einführung in die Nutzung dieser Spezialbe- 
fehle wird hier das Problem erörtert, eine einfache Figur über den grafischen Bildschirm 
zu bewegen. 


Lösungsweg: Während im (normalen) Textmodus die Zeilen- und Spaltenzahl des Bild- 
schirms in der Größenordnung 10 liegt, beträgt diese im Grafikbetrieb 100. Die genaue 
Auflösung hängt davon ab, welcher der verschiedenen Grafik-Modi gewählt wird. Unab- 
hängig davon wird im Programm jedoch mit je 1024 Zeilen und Spalten gearbeitet (adres- 
siert von O bis 1023). Das Umschalten auf einen Grafikmodus und das Aktivieren der 
Spezialbefehle erfolgt mit dem GRAPHIC-Kommando (Zeile 10 in Bild 14.10). 

Die Farben werden in 4 Farbregistern verwaltet (0 2 Bildschirm, 1 = Rahmen, 2 ® Zeichen, 
32 Hilfsfarbe). In Zeile 20 haben wir diese Register gefüllt (1 = weißer Bildschirm, 
2 = rote Zeichen). 


Nun zur Programmierung des Bewegungsvorganges! Wenn ein befriedigender Eindruck er- 
zeugt werden soll, muß die Figur jeweils am alten Ort gelöscht und am neuen Ort gezeigt 
werden. Um gezielt löschen zu können, wird für das Zeichnen der Figur ein Unterpro- 
gramm (Zeilen 200-240) erstellt, dem über Variablen (hier N) das zu benutzende Farb- 
register und die Lage eines Bezugspunktes der Figur (hier X, Y) übergeben werden. 
Zeichnen heißt, dieses Unterprogramm mit einem Farbregister größer O0 aufzurufen. 
Löschen erfolgt durch einen Aufruf mit Farbregister 0. Für den Gebrauch ist wichtig, daß 
zwischen dem Zeichnen (Aufruf in Zeile 60) und dem Löschen (Aufruf in Zeile 65) die 
Positionsvariablen nicht verändert werden. Im vorliegenden Programm, s. Bild 14.10, 
wurde als Figur ein Rechteck mit 2 Füßen gewählt. Diese Figur wird links oben beginnend 
in leicht geneigten Bahnen über den Bildschirm hin und her bewegt. 


IM GRAFHLÜ 


2a COLOEL. 08.8 
4 Ya 1ShsSfr ZEN: Leon 
Ft Fldhe Sen Tu SE „TER x 


a Ir Yaaad THEH 45 

Ei H=2: GOSUBRZUG 

5 Ne: GOSLEZRAH 

va Yet 

Ya HEMTE 

ei D=-Us HH=EHASKASHRESHESHH: Var 

1 5 EIG ER ei 

zaG REM FIGUF ZEICHNEN 

zii H=e’a:B=1l2n:=29 

z2M DRAMHN,.S,N+HTUS,YICHHBE,YTOS+E,Y+HTCS,Y+HTUR-L ,YHHrl 
zZ32 Drab N.#+B V+HHTISHE+L .TtHHH+l. 
24& RETUFN 

FERD'T. 


Bild 14.10 Bewegte Figur 
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14.8 Wurf in einen Korb 


Problem: Hier wird ein Programm vorgestellt, mit dem der direkte Korbwurf aus dem 
Basketballspiel simuliert wird. Der Benutzer muß einzelne Kenngrößen solange variieren, 
bis der (punktförmige) Ball den Korb getroffen hat. 


Über den Aspekt des Spielens hinaus dürfte der Eingabeteil von Interesse sein. Er zeigt 
beispielhaft, wie im Dialog mit dem Benutzer in beliebiger Kombination einzelne der 
Eingabegrößen angesprochen werden können. 


Lösungsweg: Bild 14.14 zeigt Ihnen, daß dieses Programm deutlich größer ist als in den 
vorangegangenen Beispielen. Aus diesem Grund wurden mehrere Unterprogramme er- 
stellt, in denen einzelne Teilaufgaben bearbeitet werden. Das Hauptprogramm (MAIN) 
enthält daher i. W. nur Aufrufe dieser Unterprogramme (s. Bild 14.12). 


Die Eingabe wurde weiter unterteilt in eine Eingabesteuerung und die eigentliche Lese- 
routine, die Sie bereits aus dem Beispiel ZAHLGET kennen. Die Eingabesteuerung ist 
auszugsweise in Bild 14.13 dargestellt. Sie wurde zugunsten der besseren Lesbarkeit 
linear programmiert. Der interessierte Leser mag sie unter Verwendung indizierter Variab- 
ler für die 7 Kenngrößen so straffen, daß nur die Prüfungen auf Zulässigkeit individuell 
formuliert bleiben. 


Der Berechnungsanteil (s. Bild 14.11) basiert auf den Bewegungsgleichungen 


2 


_ _ _ge 
xX=V, 6, Y=5+Vyt 2 





Bild 14.11 Wurf, Prinzipskizze 
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START 





Startwerte für die 7 Kenngrößen: 









H Hallenhöhe [m] 
D Korbdurchmesser [m] 
K Korbhöhe [m] 
L Entfernung Spieler-Korb [m] 
S Starthöhe des Balles [m] 
V Anfangsgeschwindigkeit [Im/sec] 
A Abwurfwinkel [Grad] 








Bildschirm löschen 


Maßstab festlegen 
Rahmen u. Korb zeichnen || 


Meldung W$ definieren 
W$ in Zeile 0 zeigen 


Winkel von Grad- in 
Bogenmaß umrechnen 
Wurfparabel rechnen u. zeichnen | 
Winkel von Bogen- in 
Gradmaß umrechnen 

benutzte Kenngrößen anzeigen 

lassen und ggf. ändern 
















Bild 14.12 Wurf-Main 
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14.8 Wurf in einen Korb 









Z1$ = "HKDLSVAt“ 
Die Steuerzeichen Z1$ 
in Zeile 1 anzeigen 


ne H------- 


ja 








WS ="K="+STRS (K) 
alten Werl -- - W$ zeigen in Zeile 0 | 
zeigen 

| Eingabe Y$, Y1$ 






neuen Wert _ --- | W$ zeigen in Zeile O 
zeigen 


Bild 14.13 Auszug aus Wurf-Eingabeteil 


yY$ = Zahl 
Y1$ = Steuerzeichen 
vergl. ZAHLGET 


RETURN 


analog für die anderen Kenngrößen 
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Darin bedeutent die Zeit nach dem Abwurf, gdie Erdbeschleunigung, V, und V, die 
Komponenten der Anfangsgeschwindigkeit. Die Steuerung erfolgt über die Zeitt, und 
zwar so, daß nach 100 Durchläufen der Weg L in X-Richtung zurückgelegt ist. 


In der Ausgabe werden Grafikbefehle der ‚Supererweiterung VC1211‘ benutzt. Da hier- 
in die Y-Achse von oben nach unten zeigt, müssen die Y-Werte nach der Maßstabstrans- 
formation entsprechend umgerechnet werden (Zeile 2055). Wer nicht über diese Erwei- 
terung verfügt, muß vor der Benutzung des Programms folgende Zeilen auf den normalen 
Textmodus umstellen: 50, 60, 110, 2055, 2060, 2205, 2210, 3250, 3260. 


FEHLT. 


15 REM OIFEETER KUFEHLUFF 

> FEM STARTHERTE 

39 H=3:0=.5: Kalte Lei: Sei Velzı Ass 
Sa GEAEHIE 2 

a ce 1... 


ww, 
C n 


Ri FEN =TEUERUNG 
13 SUNELR 

za GOSLE EA 

4 INSELN 


I MES"AUF GEHTS": GOSUE Zal 
Heft 138 
GOZLIESZERAG 
A=A#+ 130 
REM WERTE AENDERN © 
GSOSLEZ ZH 
IST IA 
STOP 
REM HURFFARREEL FEÜHNEN UHE ZEIGEN 
EEEEIZCAI SUFEURELHLADE G=9,0l: Het" 
TE=ÜL+ZEFU VE IDTELFVRER. 1 
IE DR. 2 SDT THEN UT. 2 
FOR T=4 To TE STER OT 
BauspT: Tas yET-0, SEEETKT 
IF =>L AND Yo=k THEN Nee" TREFFER II WE": Ve 
IFT>H THEN 2a7S 
IFY<a THEN 2075 
IF ABSCH-LI SB. SHOTEWS AND Ti=K THEN 2a7S 
zasa IF ABSCK-L-03 <A. SFOTEUR AND Yo=k THEN 2a7S 
2B55 Keffch+D>: Very Velaz3-t 
zei FOINT Z.8.Y7 
2465 IF MESH"" THEN 20860 
2a7@ NEXT T 
2975 b$="VYERSUCH’S NOCHMAL." 
2aEA GOUSUBSZER 
2934 PETUFH 
>2@A REM HÄLLENMASSE 
2295 Zi$=" "2 CHAR 1.9,21$ 
2218 Z1$="HKOLSYAT": CHAR 1,9,218 
2215 GOSUBSEBE 
sz2A IF Yl$="t" THEN RETURH 
22398 IF Ti1$<>"H" THEN 2248 
2232 WE="H="+STRECHI: GOSUE 320: GOSUB SARA: TeralLltE) 
2224 IF Y$=""THEN 2220 
san IF Wiek OR Wie THEN 2232 
2238 H=Y: U$="H="+STRECHYN: GOSUB 3296: GOTO 2229 
2244 IF Yi${>"K" THEN 2250 
342 U$="K="+STRSCK): GOSUE FR: GÜSUB FROH: YeYALıvE) 
244 IF Y$=""THEN 2220 


Nu 
‚m. 
Bor); 


gutem iii 


Gi Gear) irRifn 2 lo 
vie a N 
BEER ae u a a 


ber 
LINIEN 


rar fo a fo pa fl u Pat 


S 
S 
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zede IF Woa OR Yo=H THEN ZE4E 
GOZUE Zzad: GOTO 2228 


2248 Key: N$="k="+STRFCH) : 
2250 IF WI1$Z>"D" THEN 2268 


ze WE"D="+STRFCO) : GOZUE 
2254 IF 'T$=""THEN 2220 

z2ae IF Wis OR WEL THEN ZEIE 
2253 Det: WE="O="+STRECDN: 

22 IF TisZ"L" THEN 2278 


In CHEM ind 
SONANWDU 


IF T£=""THEN 2224 

IF TOD THEN 2282 

Let: ME="L="+STR$CL5: 
IF Tis>"S" THEN Z23A 


"jmd 


spa la pa fı pn 
fr Po fo Po po RS 


2274 IF W$=""THEN 2220 
2276 IF <a THEN 2272 
2278 Se ME="3="+ETREUSH 


zz IF TIEL>"W" THEN 2ER 
ges MeV HSTRFCW: GOSLUE 
Se IF Y$=""THEN Z220 
& IF T{=8  THEN 2282 


Yarı Hf="Ya'+STRgiWh: 
IF W1$CH"A" THEN 2210 


BORN 


IF WE=""THEN 2220 


TEN TEN eu Een 


IE EEE Su 0 


gyaagı REM MASSSTAB FESTLEGEH 
3410 F=1923’CL+3%D> 


aa2a IF SairH X F THEH F=9ac.H 


HS="L="+STEFLL2: GOSUB 


2 HE="Se"+STRFEEI: GOSZUR 


HE="A="+STRECAH: GOSUE 32 


IF Ti=-94 OR YW=96 THEN 2292 
A=etr: HE=E"A="+STRFÜA:: GOSUE Fed: GOTO 2228 


GOSUE Fa T=VAL VE) 


zz: GOTO 2220 


GOSUE 3a: YerAlıtE) 


m 


z32a8: GOTO 2228 


GOSZUE FEB: Y=WALCTE) 


zeig: GOTO 2220 


GOSUE 3A: TeYAL TE) 


3534 REM ÜBEREN BILESCHIRMREAHO FREILASSEH 


a4 FETUFH 
106 REM FAHMEN ZEICHNEH 


2105 K=F$CL+2%00: T=1923-F%H 
3118 Deal  2,8,1023 T0 9% 


212R K=FxilL+0b): T=eiß23-FEH 


3125 DRAW 2,3,T TO S+F&b,'r 


2128 FETUFH 


32898 REM WERT ZEIGEH IHM ZEILE © 


3218 REM VERZOEGERN 
22a Ti=Tl 


azzg IF TI © Tirea THEN 220 


324R UI$=" 

azsa CHAR 98,8, WNiE 
3260 CHAr 5,0,4$ 
=2r7A RETUFH 


TI 5,7 TO ».1923 TO 9,1923 


saaa REM ZAHL + STELIERZEICHEHN “ÜH TASTATUR 
RAUS: TE=ZAHL. TIF=AKT. STEUERZEICHEN 


995 REM EIN: Z1$=STELIERZEICHEN. 


gala Zis=e" 1ER, +" 
aa15 YE="":Yi=i? 


saza GET vi: IF Yis="" THEN Pazl 
3025 IF vYi$= CHR$U1S?> THEN RETURN 


33836 FOR Y=1 TO LENCZIF)> 
39835 IF T1$=MIDFL2Z1$,7,.12 
3a4G HEHT 'Yr 

3AS8 FOR YT=1 Tl Yo 

ass IF YISCSMIDELZAR TV, 12 
Ts=Y/$+7r1$# 


Io 
Der] 
2) 
0) 


SAES IF Tall THEN Ya=1l 
3479 IF T=11 THEN 9=18 
SS NEHT Y 

ER GOTT FAzR 
READ'T. 


Bild 14.14 Wurf-Programm 


THEN FETUFH 


THEN Fast 
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14.9 Menütechnik 


Problem: Wer nacheinander verschiedene Programme benutzen will, ohne daß die Reihen- 
folge zwingend vorgeschrieben ist, wird in der Regel mit einem über die Tastatur einge- 
gebenen LOAD-Kommando das jeweils nächste Programm von einer Kassette oder Dis- 
kette in den Rechner laden und dann starten. Diese Auswahl kann grundsätzlich auch von 
einem speziellen Programm erledigt werden, einem sog. Menü-Programm. 


Falls eine floppy-disk zur Verfügung steht, sollten alle aus einem Menü anzuwählenden 
Programme auf einer Diskette gespeichert werden. Das Menü-Programm zeigt dem Be- 
nutzer die Auswahlmöglichkeiten und fordert einen Auswahlkennwert ein. Entsprechend 
diesem Wert lädt es das jeweilige Problemprogramm, und dieses sollte als letzte Aktion 
wieder das Menüprogramm laden. Weitere Hinweise zu dieser Overlay-Technik finden Sie 
in Abschnitt 9.3. 


Hier soll erörtert werden, wie die Menütechnik auch ohne floppy-disk genutzt werden 
kann. Voraussetzung ist allerdings, daß die anzuwählenden Programme gleichzeitig in 
den Arbeitsspeicher passen. 


Lösungsweg: Die verschiedenen Programme sollten als Unterprogramme gestaltet wer- 
den, d.h. ihre letzte Aktion ist RETURN und nicht END oder STOP. Diesen Unterpro- 
grammen wird das Menüprogramm vorgelagert wie in Bild 14.15 gezeigt. 


Zur Anpassung an konkrete Anwendungen müssen die Anfangsadressen der anzuwählen- 
den Unterprogramme in Zeile 65 und die zugehörigen Kennwerte in entsprechender 
Reihenfolge in Zeile 55 eingesetzt werden. Ab Zeile 20 schreiben Sie dann PRINT-An- 
weisungen zur Erläuterung der erlaubten Kennwerte. 


S REM MENUE-FRINZIP 
FRINT"IEIKN X PRÜGEAMM" 
PRINT" A TEST i" 
FRINT" 5 TEST 2" 
FRINHT" @ TEST 3" 


Dr) 


be Eu SB 


T 
m. 


t 


23 PRINT" T ENDE" 

SA =": INPUT" FROGRAMM-KN "rs: VSSLEFTSCYE.1D: PRINT"D"; 
55 WLE="TABE" 

EA GOSUB 75 

25 ON 7 GOSUE 200. 1206, 2000. 2ace 

Fa GOTO 1m | 

75 REM POSITION Y DES ZEICHENS Ys& IM STRING Yi$ ERMITTELN 
39 FOR Y=1 TO LENGYISE: | 

SS IF MIDSCYIR.W,A=WE THEN RETURN 

34 NEXT" 

a5 Ye; RETURN 

23a REM ENDE 

218 END 

12a REM TEST 1 

1M1@ INPLT"HIER IST TEST" WS 

1939 RETURN 


zaga BEN TEST & 

ala IMPUT"HIER I5T TESTE" F'T: 

zaag FETUFRH 

aaa FEEM TEST 73 . . 
=a25 RETUFH 
FERC". 
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14.10 Haus des Nikolaus 


Problem: Die Figur aus Bild 14.16 soll so als zusammenhängender Linienzug gezeichnet 
werden, daß jede Strecke genau einmal durchlaufen und vor allem der Zeichenstift zwi- 
schendrin nicht abgehoben wird. Mancher Leser wird dieses Problem aus seiner Jugend- 
zeit kennen. Verbunden war diese Aufgabe mit Sprüchen wie ‚Das ist das Haus vom Niko- 
laus‘‘ oder „Wer das nicht kann, kriegt keinen Mann‘. 


Bild 14.16 Knoten und Wege des Hauses 


Lösungsweg: Da zu den unteren Ecken je 3 Strecken führen, muß beim Zeichnen an einer 
dieser Ecken begonnen werden. Der Linienzug endet dann an der anderen. Im Programm 
wird stets an der linken unteren Ecke gestartet. Die Auswahl der jeweils nächsten Strecke 
erfolgt zufallsgesteuert. Dabei muß natürlich beachtet werden, welche Strecken überhaupt 
möglich und welche schon erledigt sind. 

Die Wegestruktur steht als von-nach-Angabe in den Feldern A und E. Jede Strecke wird 
zweimal aufgenommen, weil nicht vorhersehbar ist, in welcher Richtung sie durchlaufen 
werden wird. Der Erledigungsvermerk steht in Feld F. Dieses Beschreibungsprinzip ist auf 
andere Problemstellungen übertragbar. Speziell auf das aktuelle Problem zugeschnitten 
sind hingegen die Kontrollen, die ein vorzeitiges Erreichen des Endpunktes verhindern 
müssen. 

Die Darstellung der Linien und die Festlegung der Farbe erfolgt hier durch direktes 
Schreiben mit POKE-Anweisungen in den Bildschirm- und Farbenspeicher. 

Bild 14.17 zeigt den Ablaufplan des MAIN und Bild 14.18 das gesamte Programm. Wenn 
Sie während der Ausführung mehrere Linienzüge sehen wollen, genügt es, auf die Frage 
„Noch einmal?‘ irgendeine Taste zu tippen. 
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START 


Wegestruktvur festlegen 


Lösche Erledigungs- 
vermerke 





N = Anzahl freier 
Strecken ab Punkt S 


N = zufällig 
gewählte ganze 
Zahl aus [1, N] 


Z = Endpunkt der 
Nten freien Strecke 
mit Startpunkt S 


Z=1oder5 
und danach nicht 
mehr alle freien Wege 
erreichbar 


Wege S> Zund Z>Sals 
erledigt kennzeichnen 


| Strecke S> Z zeichnen | 


Warten auf ein Zeichen 
von der Tastatur 


Bild 14.17 Haus-MAIN 
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i REM ZEICHNE HAUS 
1a DIM A<17>,EC1PD,FC1?D 
12 FORJ=1TO17:RERD AcJI> :NEAT I 
14 FORI=1TO17:READ ECTI:NEXT I 
1& DATA 1,.1,1,2,2,2,2,3,3,4,9,4,4,39,3,9, 
15 DATA 2,4. =,1,3, 4,5,2,%3, 1,2,3,5.1,2.%, 
298 DIM 459.775 
22 FOR I=1 TO 5 :REACı AUT, VEIT :NEAT I 
24 DATA 5,21,5,93.11,3,17,9,17,2 
Sa REM STEUERUNG 
s2 FRINT"I" :S=1 
s4 FÜR J=1 TO 17 ıF<CT5=8 :NEHT I 
556 FOR JI=1 TO & 
= GOSUELAG 
ea IF N>1 THEN N=i+INTERNDETIDEND 
2 GOSUBIHAN 
4 IF 27>5 OR J>6 THEN?O 
Be 51=-5 :9=2 :GOSUE1GR 
553 Z=5 :5=51 :IF NC3THEN 58 
ö IF Z<>1 OR J<ca OR T>5 THEN 74 
r2 IF Fi3>=8 THEN 53 
4 GOSUB 206 
r& GOSUB 2438 
ro S=Z 
Sa NEXT I 
32 FRINT"SHÖOCH EINMAL ©" 
24 GET As: IF A$="" THEN ©4 
86 GOTN 58 
1A REM N=ANZ. FREIER WEGE RE FUNKT S 
110 I=8 :N=9 
126 I=I+1 :IF AcI><S THEN 126 
134 IF RXI>>S THEN RETUFN 
14a IF FCI>=& THEN N=N+1 
159 I=I+1 :50T0138 
206 REM WEG + GEGENWEG STREICHEN 
eig I=h 
z2a I=I+1 :IF AcLI>s<>© OR EcIDSHZ THENZZ 
268 FÜI’el 
era 1-8 
ze I=sI+1 :IF Aclsi>Zz OR ErIl2©>5 THENZER 
294 F£I>=1 :RETURN 
zagm REM ZEICHNE WEG YOH 5--22 
310 DIX=SGNE HL EI KH SDVESGNET EZ 
22a Keks) ya) 
330 B=eVESQO+22%7+% :POKE E,45+T :POHE B+39725,4 
aaa IF Keiczı AND T=ercz> THEN FETUFRN 
350 KeH+D8 :r=Y+DV :60TO 330 
298 RETUFRHN 
4aa REM ZIEL HOLEN 
418 I=a:11=l 
420 I=I+1 :IF AcI>e£S THEN 429 
444 IF F<I>=G THEN Il=Il+l 
450 IF Ii:N THEN 420 
dei Z=ECI> RETURN 


3 
3 


. 


Bild 14.18 Haus-Programm 
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15 Lösungen der Aufgaben 


2-1 Der Cursor zeigt die Stelle des Bildschirms, die bei der nächsten Betätigung einer 
Taste beschrieben wird. 


2-2 Die Bildschirmzeile, in der der Cursor blinkt, wird mit der RETURN-Taste zur Be- 
arbeitung an den Rechner übergeben. 


2-3 Der Cursor wird auf das Y gesetzt und dann werden folgende Tasten betätigt: 


Lnst], Lust] ‚ [mst] , [ol,[el,[e], 


2-4 Der Cursor wird auf das U gesetzt und dann werden folgende Tasten betätigt: 


2-5 Wenn sie mit der RETURN-Taste übergeben werden, speichert er sie als Programm- 
text. 


3-1 Mit dem Fragezeichen wird das BASIC-Kennwort PRINT für die Ausgabe auf den 
Bildschirm abgerufen. Vor dem Fragezeichen dürfen Leerstellen und eine Zeilen- 
nummer stehen. 


3-2 189 A=2 
20 B=3 
30 ?A*A + A*B + B*B 
RUN 
oder als 3. Zeile 
30 ?At12+ A*B + Bt2 


3-3 10 X= 12.25 
20 Y= 35 
30 Zz= 3,5 
40 ?X/(Y*Z) 
RUN 
3-4 10 X= 12.25 
20Y= 35 
30 Zz= 35 
4 A= (X -Y)t2/(X +Z) 
sg ?A 


RUN 
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3-5 Eine Variable kann als ein Speicherplatz (für eine beliebige, veränderbare Zahl) an- 
gesehen werden. Der Variablenname entspricht der Adresse des Platzes, der Inhalt 
des Platzes bildet den Variablenwert. Variablennamen bestehen aus einem Buchsta- 
ben, zwei Buchstaben oder einem Buchstaben und einer Ziffer. 


4-1 Mit der STOP-Taste wird das laufende Programm unterbrochen. 


4-2 Vor der Programmeingabe mit NEW den Programmspeicher löschen. Nach der Pro- 
grammeingabe mit LIST den Inhalt des ganzen Programmspeichers anzeigen lassen. 

4-3 Das Programm wird mit RUN (, RUN 19 oder GOTO 1ß) gestartet. Damit ist das 
Löschen aller Variablen verbunden, so daß A in Zeile 29 mit Null multipliziert wird. 
(Bei GOTO 19 tritt der gleiche Effekt auf, falls X nach der Programmeingabe kein 
Wert zugewiesen wurde; denn auch bei der Eingabe von Programmzeilen wurden die 
Variablen gelöscht.) 


4-4 Wenn das Programm eingegeben ist, fahren Sie mit 


X=0.25 
GOTO 19 
oder mit 
A=1 
GOTO 30 
fort. 
5-1 20 ’TAB(19);B;TAB(29);A 
5-2 20 ?TAB(19);B; 
30 ?TAB(29);A 
5-3 19 ?’GEWICHT: “;G;”KG“ 
5-4 19 ?SPC(3); GEWICHT“ 
20 ?SPC(3);G;”KG“ 
6-1 "ABC, DEF“ 
6-2 18 DATA "ABC, DEF“ 
6-3 Nein 
7-1 10 INPUT Al, A2, A3 
20 AM = Al 


30 IF A2<AM THEN AM = A2 
4Q IFA3< AM THEN AM = A3 
50 ? AM 
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7-2 


1-3 


8-1 


8-2 
9-1 


9-2 
9-3 


9-4 
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18 INPUT N 

20 INPUT AM 

30 K=1 

40 IFK<NTHEN 70 

5% PRINT AM 

60 END 

7K=-K+til 

80 INPUT A 

99 IFA<AMTHEN AM =A 
100 GOTO 49 


Wir müssen noch festlegen, wie der Wert von n bereitgestellt wird. Da immer über 
alle Artikel summiert werden soll, entscheiden wir uns für die Aufnahme von n in 
die DATA-Anweisungen. Diese richten wir auf ein Beispiel mit 5 Artikeln und den 
Preisen 17,50 DM, 21,00 DM, 123,80 DM, 99,80 DM und 37,90 DM aus. 


1 DATA5 

2 DATA 17.5, 21, 123.8, 99.8, 37.9 
19 SZ =0:5SN =0:L>=1 
20 READN 
30 READP: INPUT A 
Ad SZ=SZ+A*P:SN=SN+A 
59 L=L+1:IFL<=NTHEN 30 
60 PRINT SZ/SN 


Die Kassette zurückspulen und das VERIFY-Kommando geben. Wenn die PLAY- 
Taste eingelegt ist, erscheint die Meldung 


FOUND Name. 
AKT, ART, AST, AK, AR, AS, A. 


Die erste Angabe (1) ist die Kanalnummer, die zweite (8) ist die Gerätekennzahl der 
floppy-disk und die dritte (15), die sog. Sekundäradresse, kennzeichnet den Kanal 
als Übertragungsweg für Kommandos. 


Der Diskettenname ist für den Rechner ohne Bedeutung. 


Wenn die Diskette in Laufwerk 1 liegt, wird nach LOAD ’”$1‘“ und LIST deren In- 
haltsverzeichnis angezeigt. Im Programmspeicher steht das Inhaltsverzeichnis. Wenn 
Sie jetzt ein Programm entwickeln wollen, müssen Sie sicherstellen, daß keine Zeile 
des Inhaltsverzeichnisses erhalten bleibt. Am besten löschen Sie den Speicher zuerst 
mit NEW und bauen dann das neue Programm auf. 


Über den Kommandokanal 1 wird die Aufbereitung der in Laufwerk ® befindlichen 
Diskette veranlaßt. Alte Dateien werden gelöscht. Die Diskette erhält den Namen 3 
und die Identifikation 4. 
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9-5 Die geforderte Datei wird mit folgendem Programm erstellt: 


10-1 


10-2 


10-3 


1 OPEN 2, 8, 2, "9: TEST, SEQ, WRITE“ 

20 PRINT#2, 1;CHR$(13),2;” , “,CHRI(13) 4” , “5; 
” ,“;6;CHR$(13) 

30 CLOSE 2 


Das Lesen der ersten 3 Sätze gelingt mit 


19 OPEN 3, 8, 3 "9: TEST, SEQ, READ“ 
20 INPUT #3, X : PRINT X 

30 INPUT#3,X,Y:PRINTX,Y 

40 INPUT#3,X,Y,Z: PRINTX,Y,Z 


Wenn Spezialtasten wie z.B. die Cursorsteuertasten Bestandteil eines Ausgabestrings 
sind, werden sie bei der Ausgabe auf den Bildschirm interpretiert, bei der Ausgabe 
auf den Drucker hingegen als Zeichen dargestellt. Umgekehrt gibt es auch Zeichen, 
die vom Drucker als Steuerzeichen interpretiert werden (s. Druckerhandbuch), wäh- 
rend sie auf dem Bildschirm als Zeichen erscheinen. 


10 OPEN 1, 4 

20 PRINT #1,” x,» x 12° 

48 INPUT "ANZAHL": N:K=1 
5$ INPUT X 

6B PRINT #1,X,Xt 2 
70K=K+1:IFK<=NTHEN 50 
80 CLOSE 1 


OPEN 5, 4 
CMD5 
LIST 


und nach dem Drucken 


PRINT#5 


10 INPUT "N“;N 

20 IFN<OTHEN 19 
30 F=1 

4d FORK=1TON 
50 F=F*K 

60 NEXT 

70 PRINT F 


10 INPUT’’M,N“;M,N 

20 N = INT(ABS(N)) :REM N WIRD GANZ UND NICHT NEGATIV 
30 B=1:L=1 

40 IFN=@THEN 99 
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59 FORK=1TON 
60 B= B*M/L 
7L=L+1:M=M-1I 
80 NEXT 

98 PRINT B 


11-3 Für KS #$ ist die Schleife 


20 FORK=KATOKESTEPKS 


9d NEXT 


gleichwertig mit 


18 K=KA 
20 REM 


90 K=K+KS:IF (KE- K)*SGN (KS) >= P THEN 29 


19 INPUT "’N“;N:IFN <2THEN 19 
20 DIM X (N), Y(N) :INPUT X (1), Y (1) 
30 FORK=2TON 

40 INPUT X,Y 

5$ FORL=-K-1TO1STEP -1 

60 IFX(L)<=X THEN 1PP 

70 X(L+1)=X(L):Y(L+1)=Y(L) 
80 NEXT 

9L=P 

108 X(L+1)=X:Y(L+1)=Y 

118 NEXT K 


120 REM LESEN UND SORTIEREN FERTIG 


130 FORK=1TON 
140 PRINT X (K), Y (K) 
150 NEXT 


10 INPUT”N“;N:IFN< 2 THEN 19 

20 DIM X(N) 

30 FOR K = 1 TO N:INPUT”X“;X(K):NEXT 

40 S = B:GOSUB 8ß:M = S/N:PRINT”MITTELWERT =“;M 
50 FORK=1TON :X (K) = (X(K)-M)t2 :NEXT 

60 S = :GOSUB 89 :V = S/(N - 1) 

70 PRINT "VARIANZ =";V:END 

80 FORK=1TON:S=S+X(K) :NEXT 

90 RETURN 
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12-2 


13-1 


13-2 


13-3 


1d DEFFNAS(SX) = ATN (SX/SQR (1-SXt2)) 
20 DEFFNAC(CX) = ATN(SQR (1-CXt2)/CX) 


110 INPUT ’M“;M:M$ = STR$(M):L = LEN(M$) 

120 IFI<5 THEN 119 

130 IF MID$(M$, L-3, 1) <> "E“ THEN 189 

149 KI = ‘999 

150 IF MID$(M$, 3,1) <>”. “THENKS=".“+K$ 
160 HS =LEFTS(M$, L4) + K$ 

170 M$ = LEFT$(H$, 6) + RIGHT$(M$, 4) 

180 PRINTM$ :GOTO11P 


210 INPUT "STRING“; Q$:L = LEN(Q$) 
220 IFL<1 THEN 21 

230 PRINT LEFT$(Q$, 1); 

240 IF L=1 THEN 329 

250 FORM=2TOL 

260 E$ = MID$(Q$, M, 1) 

270 FORN=1TOM-I 

280 IF E$ = MID$ (Q$, N, 1) THEN 319 
290 NEXTN 

300 PRINT E$; 

31® NEXTM 

320 PRINT :GOTO 219 


410 INPUT ”"STRING“; Q$:L = LEN(Q$) 
420 IFL<1THEN 419 

439 K=1 

440 IF L= 1 THEN 569 

450 FORM=2TOL 

460 E$ = MID$(Q$,M, 1) 

470 FORN=1TOK 

480 H$ = MID$(Q$,N, 1) 

490 IF ES=H$ THEN 559 

500 IF ES <HSTHEN 539 

51® NEXTN 

520 N=K+1 

530 Q$ = LEFT$(Q$, N-1) + E$ + MID$(Q$, N, M-N) + RIGHT$ (Q4, L-M) 
549 K=K+1 

550 NEXT M 

560 PRINT LEFT$(O$,K) :GOTO 41 
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U} ® 
Sachwortverzeichnis 
Ablaufplan 3 CHR% 48,55, 78 
— symbole 2,62 CHLOSE 48, 56, 60 
ABS 75 CLR-Taste 12,25 
APPEND 55 CMD 59 
Argument 15, 73, 74 CONT-Kommando 23 
arithm. Ausdruck 15, 16 COS 75 
— Operator 14 Cursor 6, 8,9 


Array 65 

— anlegen 66 

ASC 78 

ATN 75 

Ausgabe 9, 29, 47, 55, 59 
— zeile 29 


BASIC-Anweisungen: 
bedingte Anweisung 39, 
40 
CLOSE 48, 56, 60 
DATA 36 
DEFFN 73 
DIM 66 
END 24 
FOR...NEXT 62 
GOSUB 70 
GOTO 39 
INPUT 33,35, 48, 56 
ON ... GOSUB 71 
ON ... GOTO 40 
OPEN 47,51, 54, 59 
PRINT 9, 29, 47, 55, 59 
READ 36 
REM 21 
RESTORE 36 
RETURN 70 
STOP 24 
Wertzuweisung 17 

BASIC-Kommandos: 
CMD 59 
CONT 23 
GOTO 23, 24 
LIST 22, 59 
LOAD 25,46, 52 
NEW 22, 25 
RUN 23, 25 
SAVE 45,52 
VERIFY 46, 52 

bedingte Anweisung 39, 40 

Bemerkungen 21 


— steuertasten 7,8 


DATA 36 

Datei eröffnen 47, 54, 59 
— kopieren 53 

— löschen 53 

— schließen 48, 56, 60 
— umbenennen 53 
Datenzeile aufbauen 33 
Dauerfunktionstasten 8 
DEFFN 73 

DEL-Taste 8, 25 

DIM 66 


Eingabe 33, 35, 48, 56 
END 24 
EXP 75 


FOR... NEXT 62 


GOSUB 70 
GOTO 39 
— Kommando 23, 24 


HOME-Taste 27, 30 


Index 65 
Inhaltsverzeichnis anzeigen 
52 

INPUT 33, 35, 48, 56 
INST-Taste 8 

INT 17,75 


Kanal 47,48, 51, 54, 55, 56 
LEFTS$ 30, 79 


LEN 79 
LIST 22, 59 


LOAD-Kommando 25, 46, 52 


LOG 75 


Math. Funktionen: 
ABS 75 
ATN 75 
COS 75 
EXP 75 
INT 17,75 
LOG 75 
RND 31, 42, 75 
SGN 75 
SIN 75 
SQR 4,75 
TAN 75 
MID $ 30, 79 


NEW 22, 25 


ON ... GOSUB 71 
ON ... GOTO 40 
OPEN 47, 51, 54, 59 


PRINT 9, 29, 47, 55, 59 
Programm 4, 20 

— ablaufplan 3 

— archivieren 45, 52 

— ausführung 23 

— laden 46, 52 

— liste drucken 59 

— speicher 9 

— speicher löschen 22, 25 
— test 4 

— unterbrechen 23, 34 
— zeile 9, 22 


Rangordnung der Operatoren 15, 


42 

READ 36 

REM 21 
RESTORE 36 
RETURN 70 

— Taste 9, 11, 22 
RIGHT$ 79 
RND 31, 42, 75 


RUN-Kommando 23, 25 
— Taste 46 


Sachwortverzeichnis 


SAVE 45,52 
Schleifen 61, 62 
— schachtelung 63 
SGN 75 
SIN 75 
SPC 30 
Spezialtasten: 
CLR 12, 25 
Cursorsteuerung 7,8 
DEL 8,25 
HOME 27,30 
INST 8 
RETURN 9, 11, 22 
RUN 46 
STOP 23 
— programmieren 28, 30 
Sprung 39 
—, berechneter 40 
SQR 4,75 


Standardfunktionen 75 
STOP 24 
— Taste 23 
String 26 
— addition 79 
— funktionen: 
ASC 78 
CHR$ 48,55, 78 
LEFT$ 30, 79 
LEN 79 
MID$ 30, 79 
RIGHT$ 79 
STR$ 78 
VAL 78 
— variable 28 
STRS 78 


TAB 30 
TAN 75 
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VAL 78 
Variablen 13 
—, indizierte 65 
— name 13 
Vergleich 40 
VERIFY 46, 52 


Wertzuweisung 17 


Zahl 13 

Zeichen einfügen 8 
— ersetzen 8 

— löschen 8 
Zeilen ändern 22 
— einfügen 21 

— löschen 22 

— nummer 9,20 
Zeit 14 


VIEWE® 


Programmieren von Mikrocomputern 


Diese Bände geben den Benutzern von Mikrocomputern über die 
Betriebsanleitung hinaus zusätzliche Anwendungshilfen. Der Leser 
findet wertvolle Informationen und Hinweise mit Beispielen zur opti- 
malen Ausnutzung seines Gerätes, besonders im Hinblick auf die 
Entwicklung eigener Programme. 


Band 2 
Gerhard Oetzmann Pr EM 
Lehr- und Übungsbuch für die Von Vakrocempuletn 


Rechnerserien cbm 2001 und cbm 3001 


Mit 8 vollst. Programmen, zahlr. Beispielen und 32 Abb. 
1981. VIII, 115 S. Kart. 


: sog REM UP SORT 

Inhalt: Was ist BASIC? — Handhabung des Rechners — ste IF He2_THEN RETUR 
| n % 534 T=kiHi 
cbm-Arithmetik — Programmaufbau und -ausführung — 5x0 FOR re Ne: w 
- . . . sen Sr 
Ausgabe auf dem Bildschirm — Eingabe — Verzweigungen — == Ken Fr Pihnr 2 Vie: 
A EFF L=i TO: 

Benutzung des Recorders — Benutzung der floppy-disk — 578 T=KCH2,L) 


Benutzung des Druckers — Schleifen — Unterprogramme — 
Textverarbeitung — Demonstrationsbeispiele — Lösungen 
der Aufgaben — Sachwortverzeichnis. 

(Der inhaltliche Aufbau ist für beide Bände gleich.) 


Band 5 

Gerhard Oetzmann 

Lehr- und Übungsbuch für die 

Rechnerserien cbm 4001 und cbm 8001 

Mit 8 vollst. Programmen, zahlr. Beispielen und 32 Abb. 
1982. VIII, 119 S. Kart. 


Sa PEN - 
a 1 nd u ee ea BETLUF 
n a ı m "| | 





VIEWS 


„Die Bibel" 
für alle Elektronik-Fans 


Otger Neufang (Hrsg.) 
Lexikon der Elektronik 
Mit ca. 550 Abb. 1983. Ca. 1000 S. 16,5 x 24 cm. Gbd. 


Das „Lexikon der Elektronik’ gliedert sich in 4 Teile: 


e deneigentlichen lexikographischen Teil mit über 9000 Begriffen, 

e einen Teil mit ca. 8500 Abkürzungen englischsprachiger Begriffe 
wie JFET, MIS, Mosfet, EEPROM, RAM, ROM und Kunst- 
worten wie FORTRAN, Transistor usw., 

e ein englisch-deutsches Wörterbuch, das alle im lexikographischen 
Teil behandelten Begriffe erfaßt, 

e ein umfangreiches Literaturverzeichnis mit fast 4000 Büchern. 


Die Beschreibung der Fachbegriffe erfolgt in kurzer und knapper 
Form und berücksichtigt sowohl die Grundlagen der einzelnen 
Fachgebiete, als auch deren neueste Entwicklung. Beinahe hinter 
jedem Begriff ist der entsprechende englische Begriff vermerkt. 


Programmieren von Mikrocomputem 


Band 7: Lehr- und Übungsbuch für Commodore-Volkscomputer 
von Gerhard Oetzmann 


Commodore-Volkscomputer können in einer gegenüber der Standard- 
version deutlich erweiterten Variante der Programmiersprache BASIC 
programmiert werden. Dieses VC-BASIC enthält u.a. auch Befehle, mit 
denen die technischen Möglichkeiten des an den Computer ange- 
schlossenen Farbfernsehers zugänglich werden. Der vorliegende Band 7 
der Reihe „Programmieren von Mikrocomputern’' bietet eine um- 
fassende Einführung in VC-BASIC, ohne daß Programmierkenntnisse 
vorausgesetzt werden. Besonderer Wert wurde darauf gelegt, neben der 
Vermittlung der Sprache auch den Weg von der ersten Lösungsidee bis 
zum fertigen Programm an verschiedenen Beispielen zu demonstrieren. 


Nach mehrjähriger Tätigkeit in der Entwicklung von Anwender-Software 
lehrt Prof. Gerhard Oetzmann an der Fachhochschule Hamburg die 
Gebiete Mathematik und Datenverarbeitung. 
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